 |
|
Hi this is Christian from Germany.
I'm a beginner with perl, and got some
lessons from busunsl in a project :^).
Now that time is over ... but I hope to come back soon to make more perlish things there.
Thanks to Bernd on this way.
Needful things -- reminder
$SIG{CHLD} = 'IGNORE'; to get rid of dead childs.
cvs update -A filename to get rid of sticky tag
s/('[^']*?')|(\s+)/$2?' ':$1/ge multiple whitespaces without them inside quotes. </code>