Help for this page

Select Code to Download


  1. or download this
              seek (OUT,2,1);
          read (OUT, my $num,4);
  2. or download this
         if (/^(.*?)$delim\s\s(....)(.*)$/) {