opt
/
kaspersky
/
kav4fs
/
bin
➕ New
📤 Upload
✎ Editing:
kav4fs-setup.pl
← Back
#!/usr/bin/env perl # # Configration script for a Kaspersky application # Copyright (C) Kaspersky Lab 2003-2009 # use strict; $| = 1; BEGIN { my $appname; $appname = $1 if $0 =~ /.*[\/](\w+)-(\w+)(\.pl)?$/; my $lib = ($^O !~ /^freebsd$/i) ? "/opt/kaspersky/$appname/lib/perl" : "/usr/local/lib/kaspersky/$appname/perl"; unshift @INC, $lib; } use KL::App; KL::Utils::fatal(2, "Script started without root privileges") if ($< != 0); my $app = new KL::App(); if ( not $app->parse_cmdline() ) { exit(1); } exit(0);
💾 Save Changes
Cancel
📤 Upload File
×
Select File
Upload
Cancel
➕ Create New
×
Type
📄 File
📁 Folder
Name
Create
Cancel
✎ Rename Item
×
Current Name
New Name
Rename
Cancel
🔐 Change Permissions
×
Target File
Permission (e.g., 0755, 0644)
0755
0644
0777
Apply
Cancel