simplify

1 files changed, 1 insertions, 3 deletions

diff --git a/bin/drakguard b/bin/drakguard
index 92bb3d6..ee35cd8 100755
--- a/bin/drakguard
+++ b/bin/drakguard
@@ -531,14 +531,12 @@ sub set_permissions {
 
 sub restore_permissions {
     my ($line) = @_;
-    foreach ($line) {
-    	my ($fich, $usrname, $grpname, $mode) = /^(.*)\t(\w+)\.(\w+)\t(\d+)\s*/ or next;
+    	my ($fich, $usrname, $grpname, $mode) = $line =~ /^(.*)\t(\w+)\.(\w+)\t(\d+)\s*/ or return;
         $mode = sprintf "%04d", $mode;#make number with 4 digits
         my $guid = getgrnam($grpname);
         my $uid = getpwnam($usrname);
         chown $uid, $guid, $fich;
         chmod oct($mode), $fich;
-    }
 }
 
 sub subst_config_line {