NAOさんやtrickさんのお気持ちと、外部JSのURL吐くのくれよの落差が寂しいような。

>>286
frame, iframe 等も含めて全部たどるのがUAの動作なんですよね。
file_get_contents() しても何か見つけたら再帰的に全部たどらないといけないという。

>>284
use URI;
my $base = 'http://www.example.com';
my @js = grep { m!<script[^/>]+?src=([^\s/>]+?)!i } <DATA>; # multi-line非対応
print join("\n", map { m!src=('|")?([^'"\s>]+)!; URI->new_abs($2, $base); } @js);
__DATA__
<script src=http://example.com/script.js />
dummy
<script src='http://example.net/foo/bar/script.js'>;
<script id="test" src="http://example.org/test.js">