## some.host.name [ip: 111.222.333.444] is alive  70.05 ms)
## Updated: switched 'N' for 'd'; real data.
my @sorted = map {
   unpack 'x[d] A*', $_
} sort map {
   my( $time ) = m[([\d.]+) ms)$];
   pack 'd A*', $time, $_;
} @data;