[Vienna-pm] lesen und schreiben in Einem

peter pilsl pilsl at goldfisch.at
Mon Oct 30 12:41:52 PST 2006


> 	open RD $0;
> 	while (<RD>) {print ERG $_}
> 	close RD;

<skip>

> 	open $0 | print ERG 
> 
> Hat jemand einen Hinweis oder gleich 'die' Zeile?
> 


ich bin auch kein freund des "einzeilers", weil der code einfach nicht
mehr lesbar ist. aber egal.

du kannst $/ setzen und damit das file auf einen < >-call einlesen.
also in summe sowas wie (untested)

open RD $0;
{local $/; print ERG <RD>}
close RD;


ist aber auch kein Einzeiler.



oder du kannst natürlich das dings an dein OS auslagern. unter linux zB:

`cat $0>>$0_Erg.txt`

das ist dann ein einzeiler, aber halt OS-abhängig.

lgp




More information about the Vienna-pm mailing list