Perl Code

1) Input ip address. Check if it is in the range 172.125.1.0 and 172.125.25.0 using only regular expressions in Perl. Do not use parse functions.
2) Input a name. Check if it is valid (has at-least 3 letters and one vowel) using only return functions and regular expressions in Perl. Do not use parse functions.
3) Input email address. Check if it is valid using return function and regular expressions in Perl. Do not use parse functions.
4) Input a number. Convert the number into words using return function and regular expressions in Perl. Do not use parse functions.(15 => one five)

Questions by ashwinraot

Showing Answers 1 - 8 of 8 Answers

Gaurav.khurana

  • Mar 11th, 2013
 

Answer to question 1

#logic we are retrieving the value after the second (.) and third (.) and checking if they are in the range or not
# $1 = first value match in the pattern match which is there in first parenthesis (d)+
# $2 = second value match in the pattern match which is there in second parenthesis (d)+

Code
  1. span style="color: #009966; font-style: italic;">m/172.125.(d+).(d+)/$1$1$2$2"

    2. 

  2. IP address is within the range

    3. 

  3.  ""

    4. 

  4. IP address is out of the range

    5. 

  5. "

  Was this answer useful?  Yes

Gaurav.khurana

  • Mar 11th, 2013
 

First we are searching for a vowel , if its found we are removing it from the string

example if input string $in=hello, then since vowels are present in it , we are removing them
so $in=hll (removed all vowels) , now we know there were vowels present in the input
now we are making sure that rest string should have atleast 3 non vowel characters

Code
  1. span style="color: #ff0000;">"Please enter the input(0 to exit) :- "s/[aeiou]+//gi"

    2. 

  2. It contains a vowel and atleast 3 characters which are not vowels . 

    3. 

  3. ""

    4. 

  4. It does not meet the requirements

    5. 

  5. ";

    6. 

  6. }

    7. 

  7.  

  Was this answer useful?  Yes

Gaurav.khurana

  • Mar 11th, 2013
 

Answer to question 3:

Validated the general email id that we use but not all validation as suggested on

http://en.wikipedia.org/wiki/Email_address

Code
  1. span style="font-style: italic;"># first matching should start with character then . or _ and then numbers and then @ symbol after that yahoo.com or it could be yahoo.co.in

    2. 

  2. # assuming that atleast 2 character should come after .

    3. 

  3. "

    4. 

  4. $in  is a correct email id

    5. 

  5. ""

    6. 

  6. $in  is not a correct email id

    7. 

  7.  "

  Was this answer useful?  Yes

Srikanth

  • Sep 2nd, 2013
 

Answer to first question

172.125.(2[0-5]|1[0-9]|[1-9]).0

  Was this answer useful?  Yes

Rudra

  • Sep 9th, 2013
 

In generic we can validate the IP address as
d{1,3}.d{1,3}.d{1,3}.d{1,3}

  Was this answer useful?  Yes

Sachin

  • Sep 17th, 2013
 

This worked perfectly for me to find the range between xxx.xxx.0.x and xxx.xxx.25.25

#!/usr/bin/perl
$_ =;

if($_=~ /172.125.(2[0-5]|1[0-9]|[1-9]).(2[0-5]|1[0-9]|[0-9])/)
{
print $&;
print "Match";

}
else{
print "not match";

}

  Was this answer useful?  Yes

praveen

  • Nov 29th, 2016
 

$ip=;
chomp($ip);
if ($ip =~ /^172.125.([1-9]|1[1-9]|2[1-5]).0/){print "$ip in range
" ;}
else{print "$ip not in range
"};

  Was this answer useful?  Yes

josepla

  • Jan 11th, 2017
 

Using regex for all 3 questions IP, Name and Email

Code
  1. span style="font-style: italic;"># Encoding used by console, to check console type in Windows cmd use chcp

    2. 

  2. /^172.125.(1[0-9]|2[0-5]|[0-9]).(25[0-5]|2[0-4][0-9]|1[0-9]{1,2}|[0-9])$//^[a-z]{3,}$//[aeiou]//^.+@[^.].*.[a-z]{2,}$/);

    3. 

  3. #       say $isemail;

  Was this answer useful?  Yes

Give your answer:

If you think the above answer is not correct, Please select a reason and add your answer below.

 

Related Answered Questions

 

Related Open Questions