[Israel.pm] typeglobs

Levenglick Dov-RM07994 dovl at freescale.com
Wed Jun 27 01:56:51 PDT 2007


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




More information about the Perl mailing list