Introcution to Perl CGI

Perl function: abs

abs VALUE
abs

• If VALUE is a pure integer, it will return the integer as it is.
• If VALUE is a string, it will return 0.
• If VALUE is omitted, it will use $_.

#!/usr/bin/perl

$try1 = abs(40.4);
$try2 = abs(40);
$try3 = abs(PERL);

print "abs value of 40.4 is $try1";
print "abs value of 40 is $try2";
print "abs value of PERL is $try3";

abs value of 40.4 is 40.4
abs value of 40 is 40
abs value of PERL is 0