simple uh.. y didnt i think abt it when i tried first :)#!/usr/bin/perl my $str="30 30 36 33 36 36 36 33 36 34 26 24 21 17 17 23 27 27 31 31 3 +4 33 33 33 36 36 37 38 38 38 38 38 35 40 34 34 34 31 37 36 37 37 40 4 +0 49 40 40 40 40 40 40 40 40 33 30 30 30 30 30 42 45 45 45 45 45 49 4 +2 42"; @s=split(/ /,$str); for($i=1;$i<=scalar(@s);$i++) { print "$s[$i] "; if($i%20==0) { print "\n"; } } print "\n";
In reply to Re^2: printing 20 characters in a line.
by heidi
in thread printing 20 characters in a line.
by heidi
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |