#!/usr/bin/perl -w
$arg=$ARGV[0];
$cmd="cleartool lsvob $arg"
$arr=`$cmd`;
print "$arr\n";