亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

  免費(fèi)注冊(cè) 查看新帖 |

Chinaunix

  平臺(tái) 論壇 博客 文庫
12下一頁
最近訪問板塊 發(fā)新帖
查看: 4185 | 回復(fù): 12
打印 上一主題 下一主題

用join拼接字符串有問題，請(qǐng)大俠看看 [復(fù)制鏈接]

論壇徽章:
0
跳轉(zhuǎn)到指定樓層
1樓 [收藏(0)] [報(bào)告]
發(fā)表于 2008-07-16 10:17 |只看該作者 |倒序?yàn)g覽
我要把ip.txt的內(nèi)容讀出，再拼接成一條sql語句。但總是只輸出ip.txt的內(nèi)容，不知為什么，請(qǐng)高手指點(diǎn)指點(diǎn)！

!#/usr/bin/perl
open myfile,"ip.txt";

$sqlbegin == "insert into sevencai values(";
$sqlend == ");";

$linetxt = readline myfile;
$newsql = join $sqlbegin,$linetxt,$sqlend;
print $newsql;

論壇徽章:
1
2015年辭舊歲徽章 日期:2015-03-03 16:54:15
2樓 [報(bào)告]
發(fā)表于 2008-07-16 10:23 |只看該作者
perldoc -f join

論壇徽章:
0
3樓 [報(bào)告]
發(fā)表于 2008-07-16 10:24 |只看該作者
不用這么拼接吧，直接就用點(diǎn)號(hào)連接就行。

[ 本帖最后由 ermu 于 2008-7-16 10:34 編輯 ]

論壇徽章:
0
4樓 [報(bào)告]
發(fā)表于 2008-07-16 10:25 |只看該作者
$newsql = join "$sqlbegin",$linetxt,$sqlend;



EXPR與LIST區(qū)分一下

論壇徽章:
0
5樓 [報(bào)告]
發(fā)表于 2008-07-16 11:18 |只看該作者
原帖由 zhangkeyijian 于 2008-7-16 10:25 發(fā)表
$newsql = join "$sqlbegin",$linetxt,$sqlend;



EXPR與LIST區(qū)分一下



不行呀，如果寫成$newsql = join “insert into sevencai values("，$linetxt,$sqlend;

打出來就成了  
張三,172.16.10.2
insert into sevencai values(

變成兩行輸出了

論壇徽章:
0
6樓 [報(bào)告]
發(fā)表于 2008-07-16 11:25 |只看該作者
原帖由 ermu 于 2008-7-16 10:24 發(fā)表
不用這么拼接吧，直接就用點(diǎn)號(hào)連接就行。



也不行，寫成$newsql = "insert into sevencai values(".$linetxt.$sqlend；

輸出是 insert into sevencai values(張三,172.16.10.2

寫成 $newsql = "insert into sevencai values(".$linetxt.“);";

輸出是 insert into sevencai values(張三,172.16.10.2
          );
是兩行輸出

論壇徽章:
0
7樓 [報(bào)告]
發(fā)表于 2008-07-16 11:51 |只看該作者
$linetxt = readline myfile;
$linetxt最后有換行符吧，
增加一句chomp($linetxt ),就不會(huì)出現(xiàn)換行的情況了吧！

論壇徽章:
0
8樓 [報(bào)告]
發(fā)表于 2008-07-16 11:59 |只看該作者
原帖由 Cludy 于 2008-7-16 11:51 發(fā)表
$linetxt = readline myfile;
$linetxt最后有換行符吧，
增加一句chomp($linetxt ),就不會(huì)出現(xiàn)換行的情況了吧！



好了，謝了！

但為什么用變量拼接有問題呢？

論壇徽章:
0
9樓 [報(bào)告]
發(fā)表于 2008-07-16 12:14 |只看該作者
!#/usr/bin/perl
open myfile,"ip.txt";

$sqlbegin = "insert into sevencai values(";
$sqlend = ");";

$linetxt = readline myfile;
chomp($linetxt);

$newsql = join '' ,$sqlbegin,$linetxt,$sqlend;
print $newsql;

試試這樣的。
和你的對(duì)比一下。。

論壇徽章:
0
10樓 [報(bào)告]
發(fā)表于 2008-07-16 13:06 |只看該作者
原帖由 Cludy 于 2008-7-16 12:14 發(fā)表
!#/usr/bin/perl
open myfile,"ip.txt";

$sqlbegin = "insert into sevencai values(";
$sqlend = ");";

$linetxt = readline myfile;
chomp($linetxt);

$newsql = join '' ,$sqlbegin,$linetxt,$s ...



不行，這樣只能打出 $linetxt
您需要登錄后才可以回帖 登錄 | 注冊(cè)

本版積分規(guī)則 發(fā)表回復(fù)

  

北京盛拓優(yōu)訊信息技術(shù)有限公司. 版權(quán)所有 京ICP備16024965號(hào)-6 北京市公安局海淀分局網(wǎng)監(jiān)中心備案編號(hào)：11010802020122 niuxiaotong@pcpop.com 17352615567
未成年舉報(bào)專區(qū)
中國互聯(lián)網(wǎng)協(xié)會(huì)會(huì)員  聯(lián)系我們：huangweiwei@itpub.net
感謝所有關(guān)心和支持過ChinaUnix的朋友們 轉(zhuǎn)載本站內(nèi)容請(qǐng)注明原作者名及出處

清除 Cookies - ChinaUnix - Archiver - WAP - TOP