C:\>perl anomalous_func.pl
$smallest = 1   $biggest = 4
1 2 3 4