Help for this page

Select Code to Download

Select or download this

package MyDatabase::Candidates;
use base 'MyDatabase::DBI';
MyDatabase::Candidates->table('CANDIDATES');
MyDatabase::Candidates->columns(
 All => qw/CANDIDATEID CV/);

Select or download this

my $filehandle = $self->query->upload('cv');
my $cvfile     = do { local $/; <$filehandle> };

$candidate->CV($cvfile);