for( $i=0,$j=0; $i<20,$j<20 ; $i++,$j++){
  print "\$i = $i and \$j = $j";
}