The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

package Audio::DB::DataTypes::SongList;
use strict 'vars';
use vars '@ISA';

sub songs {  @{shift->{songs} };  }

1;