I pretty printed for my own sanity:
use strict ;
my @vob_list = `cleartool lsvob | grep "*"`;
my $entry ;
foreach $entry (@vob_list) {
chomp $entry;
my @fields = split /\s+/, $entry;
my $tag_list ;
my $vbs_list ;
@tag_list = @fields[1] ;
@vbs_list = @fields[2] ;
foreach my $lock (@t
Hi,
The error message you're getting is one of the many changes to the
nature of perl under strict. It usually means that the variable in
question needs to be either explicitely named (via
$::Package::Variable) or lexically scoped (via my, our, or use vars).
you've made a couple errors here, w
--- [EMAIL PROTECTED] wrote:
>
>
> All,
> When I use strict function, I get an error in the following
> code.
> #!/usr/local/bin/perl
> use strict ;
> my @vob_list = `cleartool lsvob | grep "*"`;
> my $entry ;
> foreach $entry (@vob_list) {
> chomp $entry;
> my @fields = split /\s+/, $entr
