Timothy,
How about this:print $char x $number_of_chars . "\n" for 1..$number_of_lines;
that's another way to do it. Thanks for the hint. This looks a little more smarter than the other solution, but that's only my opinion. I find it more readable.
Thanks Karl-Heinz _______________________________________________ Perl-Win32-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
