Есть строка @date :
print "@date\n"; # 2005 3 8
Как сделать чтобы в переменной $y было 2005, $m=3, $d=3 ?
пробовал так:
my ($y, $m, $d) = split (/ /,@date);
print "$y $m $d"; # вижу 3   :(
Помогите плиз.

• извлеч строку из массива и полместить ее в три переменные,allez, 09:56 , 09-Мрт-05
  • извлеч строку из массива и полместить ее в три переменные,gexa, 09:59 , 09-Мрт-05
• извлеч строку из массива и полместить ее в три переменные,mthawk, 11:20 , 17-Мрт-05
  • извлеч строку из массива и полместить ее в три переменные,ACCA, 00:10 , 19-Мрт-05
    • извлеч строку из массива и полместить ее в три переменные,mthawk, 11:37 , 20-Мрт-05

А если присвоить переменным значения элементов массива?

my $y = $date[0];
my $m = $date[1];
my $d = $date[2];

>А если присвоить переменным значения элементов массива?
>
>my $y = $date[0];
>my $m = $date[1];
>my $d = $date[2];

Огромное спасибо!

>Есть строка @date :
>print "@date\n"; # 2005 3 8
>Как сделать чтобы в переменной $y было 2005, $m=3, $d=3 ?
>пробовал так:
> my ($y, $m, $d) = split (/ /,@date);
>print "$y $m $d"; # вижу 3   :(
>Помогите плиз.

функция split применяется к строкам. для упаковки списков ее применять не нужно.
пусть @date =(2005 3 8)
тогда
($y,$m,$d)=@date;

а вот если у тебя будет $date='2005 3 8' - тогда нужна функция split

Мелкое уточнение:

>пусть @date =(2005 3 8)

@date = (2005,3,8);
или
@date = qw(2005 3 8);

>Мелкое уточнение:
>
>>пусть @date =(2005 3 8)
>
>@date = (2005,3,8);
>или
>@date = qw(2005 3 8);

справедливо :) проглядел.