write a script to check whether user enter a value is a
leap year or not?

Answers were Sorted based on User's Feedback



write a script to check whether user enter a value is a leap year or not?..

Answer / sourisengupta

#call this function by passing the year....


sub isLeapyear
{
$year=shift;
if($year%4==0){
if($year%100==0){
if($year%400==0)
return 1;
return 0;
}
return 1;
}
}

Is This Answer Correct ?    14 Yes 2 No

write a script to check whether user enter a value is a leap year or not?..

Answer / subhash chandran

#The logic is that the year is either divisible by both
100 and 4 , OR its only divisible by 4 not by hundred
if($Year%400 == 0 || ($Year%100 != 0 && $Year%4 == 0))
{
print "Leap year \n";
}
else
{
print "Not Leap \n";
}

Is This Answer Correct ?    8 Yes 0 No

write a script to check whether user enter a value is a leap year or not?..

Answer / sourisengupta

#call this function by passing the year....


sub isLeapyear
{
$year=shift;
if($year%4==0){
if($year%100==0){
if($year%400==0)
return 1;
return 0;
}
return 1;
}
}

Is This Answer Correct ?    7 Yes 2 No

Post New Answer

More CGI Perl Interview Questions

Define print() function in perl?

0 Answers  


How can you create anonymous subroutines?

0 Answers  


What is the difference between having a parenthesis after module name and without parenthsis after module name?? i.e Package::Module(); and Package::Module;

1 Answers  


what is the function of Return Value?

0 Answers  


What is the use of "stderr()"?

0 Answers  






How can you call a subroutine and identify a subroutine?

0 Answers  


Explain what is the scalar data and scalar variables in Perl?

0 Answers  


what are the strategies followed for multiple form interaction in cgi programs?

0 Answers  


What are the advantages of programming in perl?

0 Answers  


When do you use perl programming?

0 Answers  


What is an interpolation in perl?

0 Answers  


Difference between Perl and Mod_perl?

2 Answers  


Categories