--- Paul Cotter <[EMAIL PROTECTED]> wrote:
> There are many ways, here is one that does not involve an array
>
> my $str = 'paul cotter';
> print $1,$1 while ( $str =~ /^(.)/g );
>
> The above prints ppaauull ccootttteerr (just to show it is printing
> 1 at a time - twice).
nope -- /^(.)/ is always going to match the first character, regardless
of the /g on it. Take the caret out and it works. =o)
> It is going therough $str one character at a time seeing if it
> matches "." which means any character. So it is throwing away
> newlines. We can keep the newlines with
>
> print $1,$1 while ( $str =~ /^(.)/gs );
>
> > Hello. I am attempting to print a string one character at a time.
> Right
> now I am using one while loop with chop to create a new string, the
> reverse
> of the original string, then another while loop with chop on the
> reversed
> string to print out the characters. I'm sure there's a more
> straight-forward way of doing this - any ideas?
>
>
__________________________________________________
Do You Yahoo!?
Yahoo! Auctions - buy the things you want at great prices
http://auctions.yahoo.com/
