$j=0;

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