🚀 go-pugleaf

On 2012-02-17, Wojtek Garbacz <wojtek.b.garbacz@gmail.com> wrote:
> Splits the string EXPR into a list of strings and returns that list.
> To czemu to nie działa?
> 	$A1 = Mktime(split(/[-: ]/));
> Podczas gdy to działa?
> 	($A,$B,$C,$D,$E,$F)=split(/[-: ]/);
> 	$A1 = Mktime($A,$B,$C,$D,$E,$F);

Zależy od tego, co robi funkcja Mktime() i na ile pól da się
podzielić $_.

-- 
Secunia non olet.
Stanislaw Klekot

On 2012-02-17 10:39, Stachu 'Dozzie' K. wrote:
> On 2012-02-17, Wojtek Garbacz<wojtek.b.garbacz@gmail.com>  wrote:
>> Splits the string EXPR into a list of strings and returns that list.
>> To czemu to nie działa?
>> 	$A1 = Mktime(split(/[-: ]/));
>> Podczas gdy to działa?
>> 	($A,$B,$C,$D,$E,$F)=split(/[-: ]/);
>> 	$A1 = Mktime($A,$B,$C,$D,$E,$F);
>
> Zależy od tego, co robi funkcja Mktime() i na ile pól da się
> podzielić $_.
>
Dzięki - rada pomocna :-)
Zatem drugie pytanie - jak wziąć tylko pierwszych sześć wartości z listy?
w.

On 2012-02-17, Wojtek Garbacz <wojtek.b.garbacz@gmail.com> wrote:
> On 2012-02-17 10:39, Stachu 'Dozzie' K. wrote:
>> On 2012-02-17, Wojtek Garbacz<wojtek.b.garbacz@gmail.com>  wrote:
>>> Splits the string EXPR into a list of strings and returns that list.
>>> To czemu to nie działa?
>>> 	$A1 = Mktime(split(/[-: ]/));
>>> Podczas gdy to działa?
>>> 	($A,$B,$C,$D,$E,$F)=split(/[-: ]/);
>>> 	$A1 = Mktime($A,$B,$C,$D,$E,$F);
>>
>> Zależy od tego, co robi funkcja Mktime() i na ile pól da się
>> podzielić $_.
>>
> Dzięki - rada pomocna :-)
> Zatem drugie pytanie - jak wziąć tylko pierwszych sześć wartości z listy?

(split ...)[0..5]

-- 
Secunia non olet.
Stanislaw Klekot

On 2012-02-17 11:23, Stachu 'Dozzie' K. wrote:
> On 2012-02-17, Wojtek Garbacz<wojtek.b.garbacz@gmail.com>  wrote:
>> On 2012-02-17 10:39, Stachu 'Dozzie' K. wrote:
>>> On 2012-02-17, Wojtek Garbacz<wojtek.b.garbacz@gmail.com>   wrote:
>>>> Splits the string EXPR into a list of strings and returns that list.
>>>> To czemu to nie działa?
>>>> 	$A1 = Mktime(split(/[-: ]/));
>>>> Podczas gdy to działa?
>>>> 	($A,$B,$C,$D,$E,$F)=split(/[-: ]/);
>>>> 	$A1 = Mktime($A,$B,$C,$D,$E,$F);
>>>
>>> Zależy od tego, co robi funkcja Mktime() i na ile pól da się
>>> podzielić $_.
>>>
>> Dzięki - rada pomocna :-)
>> Zatem drugie pytanie - jak wziąć tylko pierwszych sześć wartości z listy?
>
> (split ...)[0..5]
>
Dzięki znowu. Teraz problem polega na tym, że nie mogę go przekonać to 
traktowania wyjścia split-a jako tablicy:
print (split(/[-: ]/))[0..5];
 > syntax error at a.pl line 6, near ")[" # i przy okazji pierwsza 
kropka tego dwukropka w VIMie jest różowa, a druga czarna - czyli coś 
nie tak :-)
print splice((split(/[-: ]/)),0,5);
 > Type of arg 1 to splice must be array (not split) at a.pl line 5, 
near "2)"
Z góry dzięki za cierpliwość :-)

On 2012-02-17, Wojtek Garbacz <wojtek.b.garbacz@gmail.com> wrote:
>> (split ...)[0..5]
>>
> Dzięki znowu. Teraz problem polega na tym, że nie mogę go przekonać to 
> traktowania wyjścia split-a jako tablicy:
> print (split(/[-: ]/))[0..5];

Bo nawiasy, których zamierzyłeś użyć do tablicy, zostały przejęte przez
print. perldoc perlop, operator unary +.

> > syntax error at a.pl line 6, near ")[" # i przy okazji pierwsza 
> kropka tego dwukropka w VIMie jest różowa, a druga czarna - czyli coś 
> nie tak :-)

Owszem, definicja składni. Zresztą Perl w ogóle nie ma regularnej
składni (nie jest definiowany przez gramatykę bezkontekstową), więc
musisz się do tego przyzwyczaić.

> print splice((split(/[-: ]/)),0,5);
> > Type of arg 1 to splice must be array (not split) at a.pl line 5, 
> near "2)"

splice() oczekuje tablicy, a nie listy. Musisz mu podać @tab.

-- 
Secunia non olet.
Stanislaw Klekot