Help for this page

Select Code to Download


  1. or download this
     0:24 >perl -wE "my $s = qq[dogcat\n42\nbirdfish]; say qq[\nAh! The me
+aning of life is $1!] if $s =~ /dog.*?(\d+).*fish/s;"

Ah! The meaning of life is 42!

 0:25 >