#!perl #
# # Perl script 'echo.pl' to copy the first command-line argument to the # file specified by the second command-line argument. # # Syntax: # echo.pl "text" ">file" # echo.pl "text" ">>file" # Note that there no space may precede ">". # # ====================================================================== # Main program 'echo.pl': # ~~~~~~~~~~~~~~~~~~~~~~~ $DATA=$ARGV[0]; $FILE=$ARGV[1]; @ARGV=(); require 'go.pl'; &ECHO($FILE,$DATA); # ====================================================================== 1; #