[+] Usuni

[zaba141]

Witam.
Mam taki problem, walczę już z usuwaniem danego wpisu z DNS za pomocą skryptu perla lecz ciągle otrzymuję błędy. Czy mógłby ktoś na to zerknąć i pomóc?

Kod: Zaznacz cały

#!/usr/bin/perl

$text = "zone \"dupa.pl\" {
        type master;
        file \"/etc/bind/domeny/dupa.pl\";
};"

perl -pi -e 's|{$text}||g' /etc/bind/named.conf.domeny

Błędy

Kod: Zaznacz cały

Semicolon seems to be missing at ./test line 7.
syntax error at ./test line 8, near "perl "
Search pattern not terminated at ./test line 8.

[LordRuthwen]

A nie prościej to zrobić za pomocą seda?

[zaba141]

Sed także błędy wyświetlał.

[Bastian]

Kod: Zaznacz cały

#!/usr/bin/perl  $text = "zone \"dupa.pl\" {         type master;         file \"/etc/bind/domeny/dupa.pl\"; };";  perl -pi -e 's|{$text}||g' /etc/bind/named.conf.domeny

ADMIN: prosze o usuniecie

[Bastian]

Kod: Zaznacz cały

#!/usr/bin/perl

$text = "zone \"dupa.pl\" {
        type master;
        file \"/etc/bind/domeny/dupa.pl\";
};"[B];[/B]

perl -pi -e 's|{$text}||g' /etc/bind/named.conf.domeny

[zaba141]

Też nie działą już nawet znalazlem jakiś skrypt i go przerobilem ale tez nie dziala tzn nie usuwa tego wpisu

Kod: Zaznacz cały

#!/bin/sh

DOMAIN="dupa.pl";
ALIASDOMAIN=$2;


FQDOMAIN="$DOMAIN"
etc_conf_file=/etc/bind/named.conf.domeny

echo -e "Removing http/web forwarding for $DOMAIN\n\n";

# Setup the /etc conf file
echo -e "Clearing the /etc config file.\n";
etc_conf='zone "dupa.pl" {\n'
etc_conf1='^[ \t]*type master;\n'
etc_conf2='^[ \t]*file "/etc/bind/domeny/dupa.pl";\n'
etc_conf3='};'
echo -e $etc_conf;

cat $etc_conf_file | sed -e 's/$etc_conf//g' -e 's/$etc_conf1//g' -e 's/$etc_conf2//g' -e 's/$etc_conf3//g' > $etc_conf_file.tmp

[Bastian]

Ja perla nie znam, wiec nie pomoge. Napisz se w awku taki skrypt.

[zaba141]

Problem rozwiązny

Może się komuś przyda

Kod: Zaznacz cały

sed -i '/^zone \"test.pl\" {/,/^};$/ d' /etc/bind/named.conf.domeny

[Bastian]

To sie nazywa zaradność, gratki.