Back to task

28 symbols perl
Thu Sep 4 21:28:31 2014 sago35
#!/usr/bin/perl -p
$_=(sort{$a<=>$b}$_,<>)[0]


Leave a comment

Parsed as Markdown

Login to leave a comment