Are you implying that on 5.8.x it will work? The reason that I am using this syntax is to demonstrate passing typeglobs in a course :)
Best Regards, Dov Levenglick DSP SoC System and Applications Engineer, Network and Computing Systems Group Freescale Semiconductor Israel Tel. +972-9-952-2804 The information contained in this email is classified as: [ ] Freescale General Business Information [ ] Freescale Internal Use Only [ ] Freescale Confidential Proprietary [x] Personal Memorandum -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Gabor Szabo Sent: Wednesday, June 27, 2007 12:28 To: Perl in Israel Subject: Re: [Israel.pm] typeglobs Do you really need to run this on perl < 5.6.0 ? If not then why not use scalars as file handlers? open (my $IN, "<", "$0") or die "$!\n"; call_good($IN); call_bad($IN); a lot less headache Gabor On 6/27/07, Levenglick Dov-RM07994 <[EMAIL PROTECTED]> wrote: > Can someone please explain why call_bad doesn't print the file? What is > the difference between it and call_good? > > open (IN, "$0") or die "$!\n"; > call_good(*IN); > call_bad(*IN); > > sub call_bad > { > print "Doesn't work\n"; > print while <$_[0]>; > } > sub call_good > { > print "Works\n"; > *A = $_[0]; > print while <A>; > } > > > Best Regards, > Dov Levenglick > DSP SoC System and Applications Engineer, > Network and Computing Systems Group > Freescale Semiconductor Israel > Tel. +972-9-952-2804 > The information contained in this email is classified as: > [ ] Freescale General Business Information > [ ] Freescale Internal Use Only > [ ] Freescale Confidential Proprietary > [x] Personal Memorandum > > _______________________________________________ > Perl mailing list > [email protected] > http://perl.org.il/mailman/listinfo/perl > -- Gabor Szabo http://www.szabgab.com/ Perl Training in Israel http://www.pti.co.il/ _______________________________________________ Perl mailing list [email protected] http://perl.org.il/mailman/listinfo/perl _______________________________________________ Perl mailing list [email protected] http://perl.org.il/mailman/listinfo/perl
