Re: [請益] 新手問LWP
$ID = "lllllllllllllllll"
my $response = $browser->get(
"http://gggg.dyndns.biz/reg.php?ID=$ID&wip=140.114.30.191:9001&lip=19\
2.168.1.22:80&fname=pppp&path=webdav"
);
※ 引述《s1106 (big john)》之銘言:
: #!/usr/bin/perl
: use LWP::UserAgent;
: #use URI::Escape ;
: my $browser = LWP::UserAgent->new;
: $browser->agent('ReportsBot/1.01');
: $browser->credentials(
: 'gggg.dyndns.biz/ran_manager/login.php',
: 'frmRedir',
: 'admin' => 'wdaddfg'
: );
: my $response = $browser->get(
: 'http://gggg.dyndns.biz/reg.php?ID=111111111111&wip=140.114.30.191:9001&lip=192.168.1.22:80&fname=pppp&path=webdav'
: );
: 如何能把111111111111變成變數塞給ID??
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 221.169.110.164
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章