my @a = qw(a b c);my $x = (1, 2, 3, @a);say $x;
nponeccop
2011-11-23 09:50 (UTC)
d11he11
2011-11-23 10:07 (UTC)
ambroseus
2011-11-23 09:54 (UTC)
2011-11-23 10:27 (UTC)
2011-11-23 13:09 (UTC)
(Анонимно)
2011-11-23 12:37 (UTC)
Апр2012
Забыли пароль?
Создать аккаунт
Вы читаете журнал d11he11
2011-11-23 09:50 (UTC)
2011-11-23 10:07 (UTC)
2011-11-23 09:54 (UTC)
2011-11-23 10:27 (UTC)
http://perldoc.perl.org/perlfaq4.html#W
2011-11-23 13:09 (UTC)
(Анонимно)
2011-11-23 12:37 (UTC)