Return-Path: Delivered-To: apmail-perl-embperl-archive@www.apache.org Received: (qmail 1998 invoked from network); 5 Jul 2004 08:19:19 -0000 Received: from hermes.apache.org (HELO mail.apache.org) (209.237.227.199) by minotaur-2.apache.org with SMTP; 5 Jul 2004 08:19:19 -0000 Received: (qmail 60902 invoked by uid 500); 5 Jul 2004 08:19:27 -0000 Delivered-To: apmail-perl-embperl-archive@perl.apache.org Received: (qmail 60881 invoked by uid 500); 5 Jul 2004 08:19:26 -0000 Mailing-List: contact embperl-help@perl.apache.org; run by ezmlm Precedence: bulk list-help: list-unsubscribe: list-post: Delivered-To: mailing list embperl@perl.apache.org Received: (qmail 60859 invoked by uid 99); 5 Jul 2004 08:19:26 -0000 X-ASF-Spam-Status: No, hits=0.0 required=10.0 tests= X-Spam-Check-By: apache.org Received: from [194.67.57.54] (HELO f21.mail.ru) (194.67.57.54) by apache.org (qpsmtpd/0.27.1) with ESMTP; Mon, 05 Jul 2004 01:19:25 -0700 Received: from mail by f21.mail.ru with local id 1BhOgp-000OOw-00 for embperl@perl.apache.org; Mon, 05 Jul 2004 12:19:03 +0400 Received: from [80.80.111.129] by msg.mail.ru with HTTP; Mon, 05 Jul 2004 12:19:03 +0400 From: Filin To: embperl@perl.apache.org Subject: Trouble with catching output of prcodures Mime-Version: 1.0 X-Mailer: mPOP Web-Mail 2.19 X-Originating-IP: unknown via proxy [80.80.111.129] Date: Mon, 05 Jul 2004 12:19:03 +0400 In-Reply-To: <044e01c4608f$1d9f8580$0e00a8c0@orbsoft.com> Reply-To: Filin Content-Type: text/plain; charset=koi8-r Content-Transfer-Encoding: 8bit Message-Id: X-Virus-Checked: Checked X-Spam-Rating: minotaur-2.apache.org 1.6.2 0/1000/N I have a trouble with using of output of embperl procedures. E.g. there is following declaration in some file: [$ sub somesub $]Some text[$ endsub $] If I want to catch output of somesub, I can: Execute({inputfile=>"file", import=>0}); Execute({inputfile=>"file", sub=>'somesub', output=>\$str}); But what if I need to use something like: $file=Execute({object=>"file"}); $file->somesub(); How can I catch output in this case? It is possible of course just to replace [$ sub somesub ... $] with [! sub somesub {...} !], but I would be VERY glad to hear that it isn't the only decision. Please help me. (I use Embperl 1.3.6) --- Owl --------------------------------------------------------------------- To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org For additional commands, e-mail: embperl-help@perl.apache.org