Help for this page

Select Code to Download


  1. or download this
    ww@GIG:~/pl_test$ perl -c countde.pl
countde.pl syntax OK
ww@GIG:~/pl_test$ perl countde.pl
...
row element is
row element is
ww@GIG:~/pl_test$
  2. or download this
    (Replaces your 17) my $cl_data_row=(\split(/\$de/,$inp_row));
(added) print "\$cl_data_row is $$cl_data_row\n";
  3. or download this
    ww@GIG:~/pl_test$ perl countde.pl
starting script...count is 5
$cl_data_row is per|l|mo|nks|rock|s