Help for this page

Select Code to Download


  1. or download this
    cat dragnet.pl 
#!/usr/bin/perl
...
say $phone;
my $fax = $dom->at('div.phone > p:nth-of-type(4)')->text;
say $fax;
  2. or download this
    0123-4 56 78 90
just the fax ma'am
  3. or download this
    #!/usr/bin/perl
use strict;
...
say $phone;
my $fax = trim( $dom->at('div.phone > p:nth-of-type(4)')->text );
say $fax;
  4. or download this
    0123-4 56 78 90
just the fax ma'am