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