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>