From 1a904efe6952d7cd15a8fc19a26509d3e2eecbc9 Mon Sep 17 00:00:00 2001 From: Dan Buch Date: Thu, 6 Jan 2011 21:50:49 -0500 Subject: [PATCH] printing input from argv --- cli/exercise_02/input_argv.pl | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 cli/exercise_02/input_argv.pl diff --git a/cli/exercise_02/input_argv.pl b/cli/exercise_02/input_argv.pl new file mode 100644 index 0000000..b410c2e --- /dev/null +++ b/cli/exercise_02/input_argv.pl @@ -0,0 +1,11 @@ +#!/usr/bin/env perl +use strict; +use warnings; + +foreach my $inline (@ARGV) { + print $inline . "\n"; +} + + +1; +__END__