parent
c695765b4e
commit
20c678ecc8
@ -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