if($ipaddress=~m\b(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-

Write an expression or perl script to identify the entered
ip address is valid or not?

Question Posted / digesh patel

Answer Posted / digesh patel

if($ipaddress=~m\b(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\b)
print "\n It is a valid IP address :";

Is This Answer Correct ?

0 Yes

0 No

Please Help Members By Posting Answers For Below Questions

How to start perl in interactive mode?

1062

Does Perl have reference type?

942

Write a program to download the contents from www.perlinterview.com/answers.php website in Perl.

894

How to open and read data files with Perl

1057

What is warn function in perl?

965

What are scalars?

994

Explain the arguments for perl interpreter.

1256

Define say() function in perl?

972

Is perl compiler or interpreter?

947

What are the various advantages and disadvantages of perl?

903

What is perl I used for?

965

Who created perl?

929

How many types of operators are used in the Perl?

1037

What is the purpose of goto expr statement?

920

Explain perl. When do you use perl for programming? What are the advantages of programming in perl?

884