ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexandre Gorobets                   2:5020/400     08 Jan 2003  19:22:53
 To : All
 Subject : Странность
 -------------------------------------------------------------------------------- 
 

 Всех с прошедшими праздниками!
 
 Вот сегодня случайно наткнулся на сабж...
 
 use Data::Dumper;
 sub test { print Dumper([@_]) }
 
 Теперь экспериментируем:
 
 test(undef, 'last');
 Все как и положено...
 $VAR1 = [
           undef,
           'last'
         ];
 
 test(0, 'last');
 Аналогично...
 $VAR1 = [
           0,
           'last'
         ];
 
 test('xxx' !~ /yyy/, 'last');
 Тоже ничего криминального...
 $VAR1 = [
           '1',
           'last'
         ];
 
 test('xxx' =~ /yyy/, 'last');
 А вот тут как-то забавно получилось....
 $VAR1 = [
           'last'
         ];
 -----
 С уважением, Александр
 --- ifmail v.2.15dev5
  * Origin: WEBPlus Ltd. (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    Странность   Alexandre Gorobets   08 Jan 2003 19:22:53   Re: Странность   Artem Chuprina   08 Jan 2003 20:00:33   Re: Странность   Alexandre Gorobets   09 Jan 2003 11:32:10   Re: Странность   Ivan Frolcov   08 Jan 2003 21:37:10