sed script als perl einzeiler - #81200 (Allgemeines zu Perl)

dukerw

2004-03-24 16:49

User since
2003-08-20
17 Artikel
BenutzerIn
[default_avatar]

servus,

ich habe ein sed script in der form

Code: (dl )

awk '{ if (/^export/) { print | "sed -e s|\\|/|g" } else { print } }' dasScript

in der datei "dasScript" soll in allen zeilen die mit "export" beginnen alle "\" gegen "/" ausgetauscht werden.
klingt soweit ganz easy, das sed-awk script funzt aber irgendwie nich richtig. gibbet für diese zeile auch ein äquivalent in perl, so dass ich es als perl einzeiler ausführen kann mit

Code: (dl )

perl -e '...'

Thx, der Duke.