Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w

...
print WRITE "Good\n";
close(WRITE);
print <READ>;
  2. or download this
    #!/usr/bin/perl -w

...
}

print "I got [$out]\n";