Help for this page

Select Code to Download


  1. or download this
    system 'echo abc > 1.txt';
open '<:raw', '1.txt' or die $!;
print while readline '<:raw';
unlink '1.txt';
  2. or download this
    print PerlIO::get_layers("<:raw");
# unixperlio