On Aug 9, 10:04 am, [EMAIL PROTECTED] (Paul Lalli) wrote:
> my $i = 1;
> for my $line (`cleartool lsproj`) {
> print "$i. $line";$i++; > } > > print "Your choice: \n"; > chomp(my $choice = <STDIN>); Paul Lalli -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
