Help for this page

Select Code to Download


  1. or download this
    BEGIN { parse_options("NonStop=1"); }
    
  2. or download this
    #!/usr/bin/perl -dw
    use lib './lib';
    ...
    $p = MY::Patient->retrieve(1);
    $u = MY::User->retrieve(1);
    }