Select Code to Download

#! /usr/bin/perl

use warnings ;
...

$m->test() ;
$m->newTest() ;

package MyModel ;

...
  return bless {}, __PACKAGE__ ;
}
return 1 ;

package newModel ;

...
}

return 1 ;