Help for this page

Select Code to Download

Select or download this

@piped = <STDIN>;
print "last piped element: ".$piped[-1];

$user_input = <STDIN>;
print "user input: ".$user_input;