delete cache file if it contains one line only

git-svn-id: http://svn.centreon.com/trunk/plugins-2.x@11630 6bcd3966-0018-0410-8128-fd23d134de7e
This commit is contained in:
Sylvestre Ho 2011-02-08 16:52:17 +00:00
parent d7d58f969c
commit 570307f47d
1 changed files with 5 additions and 2 deletions

View File

@ -288,7 +288,7 @@ if ($opt_n) {
}
my $expr = "";
if ($opt_d =~ m/^[A-Za-z]:/) {
if ($opt_d =~ m/^[A-Za-z]:/i) {
$opt_d =~ s/\\/\\\\/g;
$expr = "^$opt_d";
}elsif ($opt_d =~ m/^\//) {
@ -301,13 +301,16 @@ if ($opt_n) {
$countLine = 0;
while ($row = <FILE>){
if ($countLine) {
my @resLine = split(/\;/, $row);
my @resLine = split(/\;/, $row);
if ($resLine[1] =~ m/$expr/) {
$partition = $resLine[0];
}
}
$countLine++;
}
if ($countLine == 1) {
unlink($cacheFile);
}
close(FILE);
}