Help for this page

Select Code to Download


  1. or download this
    my ($min_char, $max_char) = (1,12);
  2. or download this
    sub MIN { return 1  }
sub MAX { return 12 }
  3. or download this
    sub MIN { 1  }  # could just as easily be 'use constant MIN => 1;'
sub MAX { 12 }
printf "x %d - %d x", MIN, MAX;
  4. or download this
    my ($min, $max) = (1,12);
print "x $min - $max x";