Help for this page

Select Code to Download


  1. or download this
    #! perl
use strict;
...
read($fh, my $buffer2, 15);
print "The \"next\" 15 characters: '$buffer2'\n";
$fh->close;
  2. or download this
     1:17 >perl 1115_SoPW.pl

...
The "next" 15 characters: 'abcdefghijklmno'

 1:17 >