Help for this page

Select Code to Download


  1. or download this
    open FILE, "file" or die "can't read file: $!";
$char = getc FILE;
close FILE;
  2. or download this
    open FILE, "file" or die "...: $!";
{
...
  $char = <FILE>;
}
close FILE;
  3. or download this
    open FILE, "file" or die "yeah, $!";
read FILE, $char, 1;
# or sysread FILE, $char, 1;
close FILE;