in reply to Sorting ip addresses quickerin thread Sorting ip addresses quickly
$x=$_ + $x << 8 for split(/\./, $y); [download]
rather than
$x=$_ + $x * 8 for split(/\./, $y); [download]
*Woof*