working on exercise 2
This commit is contained in:
parent
c695765b4e
commit
20c678ecc8
14
cli/exercise_02/input.pl
Normal file
14
cli/exercise_02/input.pl
Normal file
@ -0,0 +1,14 @@
|
|||||||
|
#!/usr/bin/env perl
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
|
|
||||||
|
print "How about a line of input?: ";
|
||||||
|
my $inline = <STDIN>;
|
||||||
|
|
||||||
|
print "You said:\n";
|
||||||
|
print $inline;
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
||||||
|
__END__
|
Loading…
Reference in New Issue
Block a user