Help for this page

Select Code to Download


  1. or download this
    foreach my $x (keys %hash)
      {
        my $data = $hash{$x};
        print "$x\n";
      }
    
  2. or download this
    my @parts = split(/\t/, $data);
    
        my $url = $parts[0];
        $mech->get( "$url" );