http://qs321.pair.com?node_id=757138


in reply to lovely regexs

Just in case this hasn't occurred to you, there are other things in HTML which have a src attribute.

Nobody says perl looks like line-noise any more
kids today don't know what line-noise IS ...

Replies are listed 'Best First'.
Re^2: lovely regexs
by CountZero (Bishop) on Apr 13, 2009 at 12:54 UTC
    Indeed and the $extor->src method returns them all. Fortunately there is another method $extor->img that returns the src attribute of the img links only. 
    use strict;
use warnings;
use HTML::SimpleLinkExtor;

my $extor = HTML::SimpleLinkExtor->new();
my $url   = 'http://www.perlmonks.org';

$extor->parse_url($url);

foreach my $src ( $extor->img ) {
    print "$src\n";
}

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

    [download]

    CountZero

    A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom