my $ipaddr = "192.168.0.11"; my ($prefix) = join('.',@{[split(/\./,$ipaddr)]}[0,1]); [download]
In reply to Re: Split on 2nd Occurence by rdfield in thread Split on 2nd Occurence by Anonymous Monk