Back to task

28 symbols perl
Sun Aug 10 00:32:43 2014 dionys
#!/usr/bin/perl -p
$_=(sort{$a<=>$b}$_,<>)[0]


Leave a comment

Parsed as Markdown

Login to leave a comment