Error Codes (with YAML) - The Code

  use Data::Phrasebook; 
 
  my $q = Data::Phrasebook->new( 
              loader => 'YAML', 
              file   => 'phrases.yaml' 
  ); 
 
  my $error = $q->fetch('100');  
  # returns 'Oops you did something wrong!'