Re: How do I do this on Perl ...

2006-08-23 Thread Chad Perrin
On Tue, Aug 22, 2006 at 11:44:43PM -0500, Mumia W. wrote: > > for my $letter (qw(a e i o u)) { > print $letter, "\n"; > } Fore! #!/usr/bin/perl -l use strict; use warnings; print for qw(a e i o u); . . . or from the command line: perl -le 'print for qw(a e i o u)' Sorry, couldn't

Re: How do I do this on Perl ...

2006-08-22 Thread John W. Krahn
[EMAIL PROTECTED] wrote: > Hi all, Hello, > I used to do this on UNIX scripts ... > > #!/usr/bin/ksh > vowels="a e i o u" > for letter in $vowels > do >echo $letter > done > > How do I do the same in Perl? #!/usr/bin/perl use warnings; use strict; my @vowels = qw/ a e i o u /; for my $let

Re: How do I do this on Perl ...

2006-08-22 Thread Mumia W.
On 08/22/2006 11:24 PM, [EMAIL PROTECTED] wrote: Hi all, I used to do this on UNIX scripts ... #!/usr/bin/ksh vowels="a e i o u" for letter in $vowels do echo $letter done How do I do the same in Perl? Is it possible to do this in Perl without having to put vowels into an array and use for

RE: How do I do this on Perl ...

2006-08-22 Thread Bobby Jafari
my @vowels = ("a","b","c","d"); my $letter; foreach $letter (@vowels) { print "$letter\n"; } -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]