Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    use strict;
    ...
    $s =~ /no match/gm;
    print $s =~ /(hubba\d)/gm;