Help for this page

Select Code to Download


  1. or download this
    package User;
use strict;
...
User->columns(Other=>qw/password age/);

1;
  2. or download this
    bless({ name=> "test", password=>"password", age=>10},"User")
# bless({ name=> "test", password=>"password", age=>10},"User")->age()
+ gives error.
  3. or download this
    use User;
bless({ name=> "test", password=>"password", age=>10},"User")->age();
# returns 10