Help for this page

Select Code to Download


  1. or download this
    open FILEHANDLENAME, ">>storage.txt";
print FILEHANDLENAME $name," ",$num,"$email","\n";
  2. or download this
    $datafile = '/full/path/to/storage.txt';  #somewhere near the top
...
open FILEHANDLENAME, ">>$datafile" or die "Couldn't open $datafile for
+ appending: $!";
print FILEHANDLENAME "$name $num $email\n";
  3. or download this
    $line=<FILE>;
while ( my $line = <FILE> ) {
  4. or download this
    ---------- BEGIN storage.txt ------------
NAME      EMAIL        PHONE
Joe Blow  joe@joe.com  123-1233
Jon Blow  jon@jon.com  345-3455
---------- END storage.txt ------------