SNMP-Abfragen mit Sonderzeichen (Perl/CGI)

[thread]13548[/thread]

SNMP-Abfragen mit Sonderzeichen

Leser: 15

Articles: hide open all | hide show old branches

+5 replies
Gast Andreas

2009-05-20 10:45

Hallo Community,

ich versuche mit einem Perl-Script (auf Linux) via Net::SNMP die Netzwerkinterfacebezeichnung von Windows-Servern auszulesen.
Die Interfacebezeichnung soll als Dateiname verwendet werden. (z.B. eth0.rrd)

Leider sind in den Rückgabewerten unsichtbare (Steuer-)Zeichen enthalten.
Die Dateien heißen dann nur 'eth0' und das '.rrd' fehlt.
Im vi wird mir das ganze als ^@ anzeigt.

Jetzt versuche ich schon ne Weile diese Zeichen zu löschen.

Leider hab ich es mit einer Regex ($interface =~ s/^@//g;) nicht geschafft.

Hab noch eine Regex versucht und diesmal wollte ich nur 'A-Z', 'a-z', '0-9', '_', '-' und '#' als gültige Zeichen.
Hat aber auch nicht wirklich geklappt.

Daher hab ich mir das ganze mal in ASCII umgewandelt und festgestellt, dass das Zeichen den ASCII-Wert 0 hat.
Hat mir aber auch nicht wirklich weitergeholfen.

Jetzt meine große Frage:
Wie bekomme ich die Zeichen weg?

Meine Idee wäre eine Schleife für jedes Zeichen mit einer Überprüfung des ASCII-Wertes, aber das muss doch auch einfacher gehen, oder?

Wäre für jeden Hinweis dankbar.

Andreas
- +4 replies
- Gast wer
  
  2009-05-20 11:12
  Code (perl): (dl )
  
  1 2
  
  my $string="Text\0Text" # \0 ist "^@" oder "ASCII 0" $string=~tr/\0/ /
  - +3 replies
  - Gast Andreas
    
    2009-05-20 13:03
    
    Hallo wer,
    
    danke für die schnelle Antwort.
    
    Das schat so einfach aus, muss ich gleich mal testen ;)
    
    Wie wäre das denn bei einem ASCII 69?
    \69 oder \6\9 ?
    
    Gruß
    Andreas
    - +2 replies
    - Linuxer
      
      2009-05-20 13:14
      
      User since
      2006-01-27
      3890 Artikel
      HausmeisterIn
      
      Hi,
      
      ich würde die Angabe hexadezimal oder oktal machen:
      
      Code: (dl )
      
      1 2 3 4 5
      
      $ # ASCII 0 = NUL = \x00 = \000 $ # ASCII 69 = E = \x45 = \105 $ perl -wle '$,=" "; print "\x45", "\105", chr(69);' E E E $
      
      Last edited: 2009-05-20 13:15:56 +0200 (CEST)
      meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
      Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
      - Gast Andreas
        
        2009-05-25 08:04
        
        Hallo zusammen,
        
        vielen Dank.
        
        Hat super funktioniert.
        
        Gruß
        Andreas

View all threads created 2009-05-20 10:45.