Sample setup.pl script for the custom signature

Last published : Jul 06, 2026
The following is the sample setup.pl script for the custom signature:
\#!/opt/VRTSsfmh/bin/perl

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

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

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

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

\# Copy file under signatures directory
foreach $sigfile (@signature_files)
{
        print "Copying script $sigfile to $sigdir\n";
        copy($sigfile,$sigdir);

        print "Making script executable\n";
        my $pc = File::Spec->catfile($sigdir,$sigfile);
        system("chmod +x $pc");

        \# Upload signature only on CS
        if ( VRTS::AddOnInfo::is_CS() )
        {
            print "Uploading script\n";
            my $cmd1 = VRTS::Util::make_command($pcregutil,"--script",$pc);
            system($cmd1);
        }
}
exit(0);