Help for this page

Select Code to Download


  1. or download this
    ##
## _fd()
...
sub max {
  ($_[0] > $_[1]) ? $_[0] : $_[1];
}
  2. or download this
    ##
## test_default()
...

  print "Hello my name is $name\n";
}
  3. or download this
    use base 'Attribute::Default';

...

  print "Hello my name is $name\n";
}