#! /usr/bin/perl

use warnings;
use strict;

use Data::Dumper;

my @ips = qw/	
      123.12.255.12
      12.255.67.19
      255.78.132.255
      12.255.67.18
      12.245.66.20
      123.33.65.89
      123.32.65.78
      255.78.130.123
      123.33.65.78
/;

my @sorted_ips = sort {$a cmp $b} @ips;

print Dumper \@sorted_ips;

----------
$VAR1 = [
          '12.245.66.20',
          '12.255.67.18',
          '12.255.67.19',
          '123.12.255.12',
          '123.32.65.78',
          '123.33.65.78',
          '123.33.65.89',
          '255.78.130.123',
          '255.78.132.255'
        ];