Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    print "Success Ran Here";
    ...
    @var=<FH>;
    close(FH);
    print $var;
    
  2. or download this
    ww@GIG:~/pl_test$ perl -e '@var=`success.pl`;print @var;\n;'
    wheelerw@GIG:~/pl_test$
    
    ...
    # newline added in 'print $var . "\n";' in *nix script
    
    =cut