Select Code to Download

use strict;
use warnings;
use HTML::SimpleLinkExtor;
...
foreach my $src ( $extor->img ) {
    print "$src\n";
}

http://promote.pair.com/i/pair-banner-current.gif
http://perlmonks.org/images/monkpics/pater_hat_sm.gif