Citanie zo suboru

[Peter 'Sheehy' Silhavy]

Jindra Vavruska wrote:

> Co treba tohle:
> 
> #!/usr/bin/perl
> my @nazvy_promennych = qw(jmeno prijmeni adresa mesto psc datum_narozeni) ;
> 
> @soubor = <STDIN>;
> 
> foreach (@nazvy_promennych) {  ${$_} = shift @soubor; }
> 
> __END__
> 
> Nezkousel jsem to, ale mohlo by to fungovat. Co jste zkusil vy?
> 
> -- Jindra Vavruska (OK1FOU) Linux is good for me
No so mnou to vyzera tak, ze som pred par tyzdnami zacal a som vdacny
za kazdu pomoc. Budem sa snazit nejako to vyriesit, zatial su to len
take hracky ...
Perl je fakt krasny ...

Vdaka za Vas cas ...


-- 

	                Peter Silhavy
.ooo0 0ooo.		sheehy na pobox.sk			  
(   ) (   )		http://sheehy.mtf.stuba.sk	  
-\ (---) /--------------------------------------------<>
  \_) (_/