Another problem... [begin code sample] open (FD, $prog $host public $oid |)" || die; *my $val1 = <FD>; close (FD); [end code sample]
I'm getting this error: Modification of a read-only value attempted at FILE.PL line 22. Line 22 is the line with the (*) above. I'm using this exact same code (I cut and pasted it) in another program with no problems. What does this mean? ----------------------------------------------------------------- Dennis Schroeder || || Network Engineer || || SANMINA Global Network Services |||| |||| Phone: 602-824-8431 ..:||||||:..:||||||:.. Mobile: 602-432-3258 Cisco Certified Email: [EMAIL PROTECTED] Network Associate ----------------------------------------------------------------- Argue for your limitations and, sure enough, they're yours! ----------------------------------------------------------------- -----Original Message----- From: Schroeder, Dennis [mailto:[EMAIL PROTECTED] Sent: Wednesday, September 12, 2001 9:49 AM To: [email protected] Subject: [rrd-users] PERL Help Needed I am working on a program that will check for Cisco devices on our network (using SNMP). I can poll a device and get a result like: Cisco Systems WS-C5505 Cisco Catalyst Operating System Software, Version 5.1(1) Copyright (c) 1995-1999 by Cisco Systems using this small command set: open (FD, "$prog $host public $oid1 |") || die; my $val = <FD>; close (FD); How do I then check $val for the existance of "Cisco" anywhere in the output? Thanks! ----------------------------------------------------------------- Dennis Schroeder || || Network Engineer || || SANMINA Global Network Services |||| |||| Phone: 602-824-8431 ..:||||||:..:||||||:.. Mobile: 602-432-3258 Cisco Certified Email: [EMAIL PROTECTED] Network Associate ----------------------------------------------------------------- To lead a symphony, you must occasionally turn your back on the crowd. ----------------------------------------------------------------- -- Unsubscribe mailto:[EMAIL PROTECTED] Help mailto:[EMAIL PROTECTED] Archive http://www.ee.ethz.ch/~slist/rrd-users WebAdmin http://www.ee.ethz.ch/~slist/lsg2.cgi -- Unsubscribe mailto:[EMAIL PROTECTED] Help mailto:[EMAIL PROTECTED] Archive http://www.ee.ethz.ch/~slist/rrd-users WebAdmin http://www.ee.ethz.ch/~slist/lsg2.cgi
