diff options
Diffstat (limited to 'postfix_wizard/scripts/testlabel.pl')
-rw-r--r-- | postfix_wizard/scripts/testlabel.pl | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/postfix_wizard/scripts/testlabel.pl b/postfix_wizard/scripts/testlabel.pl deleted file mode 100644 index c61d3cb0..00000000 --- a/postfix_wizard/scripts/testlabel.pl +++ /dev/null @@ -1,15 +0,0 @@ -$toto = "tutu"; -$tata = "titi"; - -$file = "/home/logarno/toto"; -open(CANONICAL, "< $file"); -while (<CANONICAL>) { - if (/\@$toto\s*\@$tata/){ - goto NOUPDATE; - } -} -close(CANONICAL); -open(CANONICAL, ">> $file"); -print CANONICAL "\n\@$toto \@$tata"; - NOUPDATE: - close(CANONICAL); |