use perl tainted mode for security

This commit is contained in:
speed47 2015-09-20 14:01:19 +02:00
parent db8b093c0e
commit 2319dee5a6

View file

@ -1,8 +1,10 @@
#! /usr/bin/perl
#! /usr/bin/perl -T
use strict;
use warnings;
use Data::Dumper;
$ENV{'PATH'} = '/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/usr/local/sbin';
#my $dev = shift;
my @cmd;
my %filesystems;