Help for this page

Select Code to Download


  1. or download this
    package My::Schema;

...
__PACKAGE__->load_namespaces();

1;
  2. or download this
    package My::Schema::Result::CD;

...
      ]);

1;
  3. or download this
    package My::Schema::ResultSet::CD;

...
use base qw ( DBIx::Class::ResultSet );

1;
  4. or download this
    #!perl -sl
use lib qw ( c:\code\perl );
...
print $_->RN.",".$_->cdid.",".$_->title while $_ = $cd_rs->next;

__END__