Help for this page

Select Code to Download


  1. or download this
      if ( ! -s $file ) {
           die "File $file does not exist!  Check the command line or 
+the pedigree file for errors!\
+n";
   }
  2. or download this
       if ( $file =~ /.*\.bz2/ ) {
...
   } elsif ( $file =~ /.*\.gz/ ) {
  3. or download this
       if ( $file =~ /\.bz2\z/ ) {
...
   } elsif ( $file =~ /\.gz\z/ ) {