Sample unsetup.pl script for a custom signature

Last published : Jun 19, 2026
The following is the sample unsetup.pl script for a custom signature:
\#!/opt/VRTSsfmh/bin/perl

BEGIN { @INC = ("/opt/VRTSsfmh/lib/modules"); }

use VRTS::AddOnInfo;
use File::Copy;
require File::Spec;

my $install_dir = VRTS::Paths::get_path("InstallDir");
my $sigdir = File::Spec->catfile($install_dir,"lib","signatures");
my $pcregutil = File::Spec->catfile($install_dir,"bin","pcreg");

\# Creating array of signature files name and signature name
@signature_files = ("UnUsedVolumes.pl");
@signature_names = ("PC_VXVM_UNUSED_VOLUMES");

\# Remove script on CS
if ( VRTS::AddOnInfo::is_CS() )
{
    foreach $signame (@signature_names)
    {
        print "Remove signature $signame\n";
        system("$pcregutil --id $signame");
    }
}

\# Remove signature from signature directory
foreach $sigfilename (@signature_files)
{
    print "Remove script $sigfilename\n";
    my $sigfile = File::Spec->catfile($sigdir,$sigfilename);
    File::Path::rmtree("$sigfile");
}
exit(0);