Simple question

[Kailash . Subramanian]

Hi All,
      I am working on the following output.

* /ebppvobstore/vobs/Core /ebppvobstore/vobs/aci.vbs public
* /ebppvobstore/vobs/UCMCQ /ebppvobstore/vobs/UCMCQ.vbs public (ucmvob)
  /ebppvobstore/vobs/Comp_Care /ebppvobstore/vobs/Comp_Care.vbs/ public

I want to check for the asterisks and if found do something else do something. I
am having a little trouble to make this work.
This is the code

use strict ;
my @vobtags = `cleartool lsvob` ;
my $vobs ;
my @check ;
foreach $vobs (@vobtags) {
chomp $vobs ;
@check = split /\s+/, $vobs ;
chomp $check[0] ;
if ($check[0] ne " ") {
print "$check[1] \n" ;
}
else{
print " The vob $check[1] is not mounted\n ";
}
}

This is the output I am getting (obviously not what I want)
dug # perl vobmount
/ebppvobstore/vobs/Core
/ebppvobstore/vobs/UCMCQ
/ebppvobstore/vobs/Comp_Care


I would appreciate if somebody can help me, point my blunder.

Thanks
Kailash