[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