> muze mi nekdo poradit jak v Perlu nactu cely soubor naraz do promenne?
> Je na to nejaka takova funkce? Potrebuju mit v promenne jako retezec
> cely soubor presne tak jak je na disku.
> Diky, Kalumet.
Fce 'na to' neni, protoze si ji muzes napsat. Moznych reseni je samozrejme
spousta, jedno z nich je treba tohle:
sub file2str{
my($file);
{
local(*INPUT,$/);
open(INPUT,@_[0]) or die "Sorry, can't open @_[0]\r\n";
binmode(INPUT);
$file=<INPUT>;
}
return $file;
}
A pak proste udelas treba:
$myfile=&file2str('./mujsoubor.ext');
BTW: pokud ti ve ve fci chybi zavreni souboru, tak nechybi... :). Soubor
se zavre sam, protoze po opusteni bloku zanikne handler.
Ivanek.
______________________________________________________________________
Reklama:
On-line úvěr bez poplatku na http://www.burinka.cz! Přišel čas půjčit si na bydlení pohodlně.
This archive was generated by hypermail 2.1.3 : 13. 05. 2003, 20:52 CEST