On Dec 18, 2007 4:35 PM, Martin Visser <[EMAIL PROTECTED]> wrote: > perl -e 'while(<>){$a+=s/[,]//g};print "$a\n"' <input.txt >
Ruby version: ruby -e "p IO.read('input.txt').count(',')" Lindsay -- http://slug.org.au/ (the Sydney Linux Users Group) http://holmwood.id.au/~lindsay/ (me) -- SLUG - Sydney Linux User's Group Mailing List - http://slug.org.au/ Subscription info and FAQs: http://slug.org.au/faq/mailinglists.html