This package includes two example Perl scripts that allow for discovery of volumes on Block Storage Controller (Enterprise/Data Center) and the creation of snapshots through CorteX.  FIle descriptions:

 

bsc.config - This is an XML config file that can be used to store the system Serial Number, IP address, and authentication info

bsc_getvols.pl - This script will query the BSC for all volumes, and report their GUID (needed for snapshot creation) as well as the volume type (primary, snapshot, metadata, etc)  This script can be combined with bsc_snapvol.pl to perform the query and snapshot in a single script, or for verification purposes.

bsc_snapvol.pl - This script takes a given GUID ($src_id) and snapshot name ($dst) to create a snapshot of a volume.  For the sake of an example script, the variables are set manually, but they certainly could be passed via @ARGV, entries in the bsc.config, or auto-generated, etc....