in reply to Core dump while trying to access %Lexicon in Locale::Maketext subclass

I don't have neither any experience with Maketext, nor the file.msg, so I tried with a random file. The output was different: 
Can't locate Locale/Maketext/Lexicon/Messages.pm in @INC (you may need
+ to install the Locale::Maketext::Lexicon::Messages module) (@INC con
+tains: ...) at (eval 5) line 1.
BEGIN failed--compilation aborted at (eval 5) line 1.

[download]
($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,

[download]

Replies are listed 'Best First'.
Re^2: Core dump while trying to access %Lexicon in Locale::Maketext subclass
by alexander_lunev (Pilgrim) on Jun 15, 2017 at 19:46 UTC
    Yes, sorry, it's a subclass for my own messages format: 
    package Locale::Maketext::Lexicon::Messages;

use strict;

use Encode qw( decode);

require Locale::Maketext::Lexicon;


sub parse {
    my( $class, @content) = @_;
    my $res = {};

    my $decode = Locale::Maketext::Lexicon::option( 'decode');

    foreach ( @content) {
        /^\s*$/o and next;
        /^\s*#/o and next;
        $res->{ $1} = $2
            if (/^\s*([^\s:]*)\s*:\s*(.*)$/o);
    }
    return $res;
}

1;

    [download]
    And the file.msg format is like this: 
    message_code1:              Message Text 1
message_code2:              Message Text 2

    [download]
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom