#verify volume is in running state
#!/usr/local/bin/perl
 @list = ("vxinfo -g <diskgroup name> <volumename>","vxinfo -g <diskgroup name> <volumename>" ");
 # foreach loop execution
foreach $a (@list){
$result = `$a`;
print "output of command $a is $result\n";
}

##</code><code>##

print "stopping the volume\n";

$vol1 = `vxvol -g  <diskgroup name>  stop <volumename>`;
$vol2 = `vxvol -g <diskgroup name>  stop <volumename>`;