echo.pl 178 B

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