Write an expression or Perl script to identify the entered IP address is valid or not?
Submitted by: Administrator#! /usr/bin/per
use strict;
#- Use Input
#---------------
my $ip_add = "";
#- Script start
#---------------
print"Enter the IP addressn";
$ip_add = <STDIN>;
chomp($ip_add); # Remove the last "n" character
$ip_add=$ip_add."."; # Append . at the end of IP address
#-------Expression to check IP address is valid or not-----#
if($ip_add =~ m/^[0-2]?[0-5]?[0-5]?.){4}$){
print" Valid IP Addressn";
}else{
print" Invalid IP Addressn"
}
Submitted by: Administrator
use strict;
#- Use Input
#---------------
my $ip_add = "";
#- Script start
#---------------
print"Enter the IP addressn";
$ip_add = <STDIN>;
chomp($ip_add); # Remove the last "n" character
$ip_add=$ip_add."."; # Append . at the end of IP address
#-------Expression to check IP address is valid or not-----#
if($ip_add =~ m/^[0-2]?[0-5]?[0-5]?.){4}$){
print" Valid IP Addressn";
}else{
print" Invalid IP Addressn"
}
Submitted by: Administrator
Read Online CGI Perl Job Interview Questions And Answers
Top CGI Perl Questions
☺ | Difference between Perl and Mod_perl? |
☺ | Write a script to display mirror image of a entered value and also check whether Palindrome? |
☺ | Write an expression or Perl script to identify the entered IP address is valid or not? |
☺ | Write a script to generate n prime no.s? |
☺ | How to find a substring in a string without using substr built in functions, and print the substring found? |
Top Coding/Programming Categories
☺ | Python Interview Questions. |
☺ | OOP Interview Questions. |
☺ | Software engineering Interview Questions. |
☺ | PHP Interview Questions. |
☺ | VBA (Visual Basic for Applications) Interview Questions. |