[LUGOS] Štetje

[Jernej Simončič]

On Monday, April 28, 2008, 16:39:37, Grega Fajdiga wrote:

> Rad bi preštel prevedljive vrstice, saj moram njihovo število 
> vključiti med statistiko.

Če prav vidim, se vse prevedljive vrstice začnejo z ID "besedilo" ali
ID, "besedilo". Jaz bi to preštel s kratkim perl programom:

cat *.rc | perl -e 'while(<>) { $n++ if /^\s*\w+,?\s*"[^"]+"/ }; print "$n\n"'

Praznih nizov ("") ne bo preštelo.

-- 
< Jernej Simončič ><><><><>< http://eternallybored.org/ >

Hypocrisy is the Vaseline of social intercourse.
       -- Newman's Law