Help for this page

Select Code to Download


  1. or download this
    my $error_messages = MessageLibrary->new({
      file_open_error => sub{"Couldn't open $_[0]: $!"},
      bad_token => sub{"Invalid token $_[0] encountered on line $_[1]"},
    ...
      starting_parse_phase => "Starting parser...",
      generating_results => sub {"Generating results for element $_[0]"},
    });
    
  2. or download this
    print $status_messages->undefined_msg($a_param, $another);