my @numbers;
while( my $num = <DATA> ) {
    chomp $num;
    push @numbers, $num + 0;
}
print "$_\n" for sort { $a <=> $b } @numbers;
__DATA__
1e-13
2e-18
1e-11