Help for this page
use strict; use warnings; ... my($i,$j,$k,$l) = split (//,$num_string); print "i=$i j=$j k=$k l=$l\n"; }
i=0 j=0 k=0 l=0 i=0 j=0 k=0 l=1 ... i=9 j=9 k=9 l=7 i=9 j=9 k=9 l=8 i=9 j=9 k=9 l=9