Help for this page

Select Code to Download

Select or download this

sub fexist($) {
  my $str = shift;
...
  }
  return 0;
}

Select or download this

sub fexist($) {
  my $str = shift;
...
  }
  return 0;
}