#!/usr/bin/perl
use strict;
print asdfagertghswdfgasdfgsdfgasdf;
# то же самое, когда перл не может определить контекст bareword, он рассматривает его как FILEHANDLE
{
no strict 'refs';
*{a} = sub {return "hello!!!";};
}
print a; # does nothing
print a (); # nothing
print "-=-=-=-=-=-=-=-";
print a(); # ok
print &a; # ok
#beware!
Friday, January 9, 2009
beware perl
как ни странно, скрипт ниже по тексту письма работает без ошибок.
Subscribe to:
Posts (Atom)