Help for this page
print 3 x 4; # This prints "3333" print 3 * 4; # This prints 12
#!/usr/bin/perl -w use strict; ... } while ($var !~ /\A$RE{num}{real}\z/); return $var; }