Packagename - #165193 (Allgemeines zu Perl)

MarkusH

2013-01-26 13:36

User since
2012-04-08
161 Artikel
BenutzerIn
[default_avatar]

Hallo,

folgende Daten habe ich vorliegen.

Code: (dl )

$VAR1 = bless( {
                 'messageId' => '0E9DB868-4CAE-A469-8B26-0000283949DF',
                 'headers' => {},
                 'clientId' => '3D5F4FB3-CB85-DA69-1AD7-00005D49B004',
                 'correlationId' => '7bEpTarpwz9untUD',
                 'destination' => undef,
                 'timeToLive' => 0,
                 'body' => {...}                             
               }, 'flex.messaging.messages.AcknowledgeMessage' );

Nun wollte ich mit

Code (perl): (dl )

package flex.messaging.messages.AcknowledgeMessage;

sub getBody {
    my ($class) = @_;

    return $class->{'body'};
};

die in body enthaltenen Daten rausziehen.

Statt Daten bekomme ich aber nur die Fehlermeldung "Invalid version format (0 before decimal required)".

Darf beim Packagenamen kein Punkt enthalten sein?
Wie kann ich das Problem umgehen?

$q =~ /(bb|[^b]{2})/