ww@GIG:~/pl_test$ perl -c countde.pl
countde.pl syntax OK
ww@GIG:~/pl_test$ perl countde.pl
starting script...count is 5
row element is
row element is
row element is
row element is
row element is
ww@GIG:~/pl_test$