##
12.345.66.20
12.345.67.18
12.345.67.19
123.456.789.12
####
#!/usr/bin/perl
open (FILE,"ipsvisiting.txt");
while () {
$j[$i++] = $_;
}
close FILE;
sub nummer {
$a <=> $b;
}
@sorted = sort nummer @j;
foreach $s (@sorted) {
print $s;
}
## ##
12.345.111.3
12.345.111.26
12.345.111.24
12.345.111.5
12.345.111.4