Help for this page
Select Code to Download
Select
or
download this
my $addr = "25.255.2.0"; my @scalar = split(/\./, $addr);
Select
or
download this
print "The address is $scalar[0].$scalar[1].$scalar[2].$scalar[3]\n";
Select
or
download this
print "The address is ",join('.',@scalar),"\n";