Return-Path: Delivered-To: apmail-activemq-users-archive@www.apache.org Received: (qmail 22494 invoked from network); 20 Jul 2010 07:33:13 -0000 Received: from unknown (HELO mail.apache.org) (140.211.11.3) by 140.211.11.9 with SMTP; 20 Jul 2010 07:33:13 -0000 Received: (qmail 26809 invoked by uid 500); 20 Jul 2010 07:33:13 -0000 Delivered-To: apmail-activemq-users-archive@activemq.apache.org Received: (qmail 26570 invoked by uid 500); 20 Jul 2010 07:33:10 -0000 Mailing-List: contact users-help@activemq.apache.org; run by ezmlm Precedence: bulk List-Help: List-Unsubscribe: List-Post: List-Id: Reply-To: users@activemq.apache.org Delivered-To: mailing list users@activemq.apache.org Received: (qmail 26562 invoked by uid 99); 20 Jul 2010 07:33:09 -0000 Received: from nike.apache.org (HELO nike.apache.org) (192.87.106.230) by apache.org (qpsmtpd/0.29) with ESMTP; Tue, 20 Jul 2010 07:33:09 +0000 X-ASF-Spam-Status: No, hits=0.0 required=10.0 tests=FREEMAIL_FROM,SPF_HELO_PASS,SPF_PASS,T_TO_NO_BRKTS_FREEMAIL X-Spam-Check-By: apache.org Received-SPF: pass (nike.apache.org: domain of lists@nabble.com designates 216.139.236.158 as permitted sender) Received: from [216.139.236.158] (HELO kuber.nabble.com) (216.139.236.158) by apache.org (qpsmtpd/0.29) with ESMTP; Tue, 20 Jul 2010 07:33:03 +0000 Received: from isper.nabble.com ([192.168.236.156]) by kuber.nabble.com with esmtp (Exim 4.63) (envelope-from ) id 1Ob7Ji-0006Om-96 for users@activemq.apache.org; Tue, 20 Jul 2010 00:32:42 -0700 Message-ID: <29212129.post@talk.nabble.com> Date: Tue, 20 Jul 2010 00:32:42 -0700 (PDT) From: titexe To: users@activemq.apache.org Subject: Re: Stomp:perl script "retrieve the values of the properties of the header" In-Reply-To: MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit X-Nabble-From: titexe@yahoo.Fr References: <29205343.post@talk.nabble.com> X-Virus-Checked: Checked by ClamAV on apache.org it works, thank you Roger Hoover wrote: > > I think it's just: > > my $headers = $frame->headers; > my $foo_header = $headers->{'foo'}; > > On Mon, Jul 19, 2010 at 7:31 AM, titexe wrote: > >> >> Hello, >> >> i use a perl script "stomp" to consume message from my broker. >> >> my $can_read = $stomp->can_read({ timeout => "5" }); >> if ( $can_read ) { >> # There is a message to collect. >> my $frame = $stomp->receive_frame; >> $stomp->ack( { frame => $frame } ); >> my $framebody=$frame->body; >> >> how to retrieve the values of the properties of the header ? >> >> Thank you in advance >> -- >> View this message in context: >> http://old.nabble.com/Stomp%3Aperl-script-%22retrieve-the-values-of-the-properties-of-the-header%22-tp29205343p29205343.html >> Sent from the ActiveMQ - User mailing list archive at Nabble.com. >> > > -- View this message in context: http://old.nabble.com/Stomp%3Aperl-script-%22retrieve-the-values-of-the-properties-of-the-header%22-tp29205343p29212129.html Sent from the ActiveMQ - User mailing list archive at Nabble.com.