my $file_error = Error::FileOpen->new(); open MYFILE, $myfile or die $file_error->handle($myfile); #### open MYFILE, $myfile or die $error_messages->generate_message( 'file_open_failed', $myfile );