Help for this page

Select Code to Download


  1. or download this
    # On the commandline
 perl -0wne'print "$_\n" for /img\s+src="([^"]+)"/igsm'  filename
  2. or download this
    # Since HTML tags can be split into multiple lines, you need all the
# content as one string
...
for ($file =~ /img\s+src="([^"]+)"/igsm){
    print "$_\n";
}