Help for this page

Select Code to Download


  1. or download this
    $writefile = pop;
    @arraytowrite = @_;
    
  2. or download this
    #!/usr/bin/perl -w
    
    ...
        $arraytowrite->[1] = "New value\n";    # We've now changed the val
    +ue of $AllFileDetails[1]!
        print "\n" . $writefile . "\n";
    }