echo.pl 174 Bytes Raw Blame History Permalink 1 2 3 4 5 6 7 8 9 10 11 12 #! /usr/bin/perl use strict; use warnings; use Getopt::Std; our $opt_n = 0; getopts('n') or die "Invalid option: $!\n"; print join(' ', @ARGV); print "\n" unless $opt_n;