Perl Split linjer i matrisen?

[davyzhu]

Hei alle,

Jeg er ny på perl.

Jeg bruker
#------------------
while (<INFILE>) (
$ line = $ _;
)
#------------------
å få en linje fra filen

Linjen kan gjerne: sum 11 32
Hvordan splitte linjer i matrisen som @ myarray = ( "sum", "11", "32"); som vet hvor mange mellomrom mellom ord?

Eventuelle forslag vil bli verdsatt!
Davy

 

[lovelyic]

Code:chomp $ linje

@ tmp_line = split (/ \ s /, $ line);

for ($ i = 0, $ i <= $ # tmp_line, $ i )

(

push (@ myarray, $ tmp_line [$ i]);

)

 

[urslen]

Den enkle array Erklæringen kan også gjøres.Her er en annen mulig måte:

Code:while (<INFILE>) (

$ line = $ _;

@ a = $ line;

print @ a;

)