Help for this page
my $string_upper = "BAR";
my $string_lower = "bar";
print " uc($string_lower) => (" , uc $string_lower, ")\n";
print "lcfirst($string_upper) => (" , lcfirst $string_upper, ")\n";
print "ucfirst($string_lower) => (" , ucfirst $string_lower, ")\n";
Testing metacharacter operations.
\L: [BAR] => [bar]
uc(bar) => (BAR)
lcfirst(BAR) => (bAR)
ucfirst(bar) => (Bar)
Once (shame on you!)
Twice (shame on me!)
More often than I'd like to be
All the time
Just when answering stupid polls
Who you callin' a fool?
I refuse to vote in this ridiculous poll
Results (484 votes). Check out past polls.