my @multi_array; push @multi_array, [split] for <DATA>;

$_->[1] *= 1.1E3 for @multi_array;


print join("\t", map { sprintf "%E", $_ } @{$_}),"\n" for (@multi_arra
+y); 
 
__DATA__
1.10000E0 1.00000E0 1.00000E0
2.20000E0 2.00000E0 2.00000E0
3.30000E0 3.00000E0 3.00000E0
[download]

Unless you want to sort, don't use sort. Unless you want to reverse the order, do not use reverse. Most importantly, sprintf returns a string, it does not print it (like print does).

bw, bliako