I start out with a list of ip addresses a1-a8.
I use the data set in a1-a8 to perform some function within the unix environment that returns a list completions; another list of ip addresses.
I am trying to figure out how to use Vlookup to compare the
two columns. If an ip address is in column a...
How do I apply $entry->get to the existing field ?
I want to grab user content, a file name and location, and use it elsewhere.
my $filfld = $left2->Entry(-background=>'blue', -foreground=> 'white',
-width=>20, -borderwidth=>3, -relief=>'sunken',)->pack();
passing either scalar to the sub...
qx("notepad @tar");
Tried this doenst work. App starts but doesnt know the path.
Can anyone tell me how this is done. I searched all 4 of my books and the FAQ's .. prolly missing it.
Tks
#build body
my $top = $main->Frame->pack(-side =>'top', -fill => 'x');
my $left1 = $top->Frame->pack(-side =>'left',pady => 9, padx => 8);
Im moving along nicely, thinking Im some cool perl guy and when I add the LEFT1 line I get the following error.
running 5.8.8 ...
C:\perlwin32gui>fm.pl...
my $main = MainWindow ->new;
MainLoop;
When I execute this snippet of code, by double clicking on x.pl I get the expected results but a cmd window opens.
Is there a way to inhibit the cmd window from opening ?
Thanks
I want to make sure that file2 includes the mandatory lines
defined in FILE1.
#!/usr/local/bin/perl -w
#
open (FILE1, "/tftpboot/houseboat") or die;
open (file2, "/tftpboot/carboat") or die;
@xray=<file2>;
for $line (<FILE1>) {
#check to see if "$line" is resident in @xray. If so, do...
if a $result contains the following, what is the best way to grab only 12.2(18)SXF8 ?
SNMPv2-MIB::sysDescr.0 = STRING: Cisco Internetwork Operating System Software
IOS (tm) s72033_rp Software (s72033_rp-ADVENTERPRISEK9_WAN-M), Version 12.2(18)SXF8, RELEASE SOFTWARE (fc2)
Copyright (c) 1986-2007...
After racking my brains for a few weeks, I found that
Expects interact will hold and continue / return based on user input. Im now trying to accomplish that with the Perl Expect.pm module. It says ...
# $process->interact([$in_handle],[$escape sequence])
$child->interact()...
The unix admin folks choose not to give me cron or at access ...
Does Perl have a way of looking at a pcs clock and kicking off a script .. that is that isnt too hard for a wanna be rookie like me to setup :)
Thanks alot folks
Rookie here
I want to be able to run an executable from inside a perl script ...
sub DBAC {
system("zoc.exe");
}
&DBAC
Ive also tried
system("zoc");
system("c:\Program Files\zoc\zoc.exe");
172.19.156.5/24
172.21.198.2/24
10.200.63.114/29
I am a excel rookie.
A spread sheet already exists with the cells given above.
I want to look at the last two digits. Based on there value, populate a different cell with the decimal equivalent.
for instance
if the last two digits in the...
http://www.sumncguysebringparts.com/sumssetup.xml
shows the intended topology at the house. I am in a rural area where its either dial up, satty or EVDO. No dsl or broadband.
Anyway .. the link given shows the intended topology. The only question I have is, can I share the EVDO connection...
I have the following file
interface Loopback0
ip address 10.207.255.224 255.255.255.255
interface FastEthernet0/0
ip address 10.205.215.129 255.255.255.128 secondary
ip address 10.207.224.3 255.255.255.128
interface Serial0/0
no ip address
interface FastEthernet0/1
ip address...
servername:~> file *.reset
10.218.100.4.reset: ascii text
10.218.101.4.reset: ascii text
10.218.102.4.reset: ascii text
10.218.103.4.reset: ascii text
10.218.104.4.reset: ascii text
10.218.105.4.reset: ascii text
10.218.106.4.reset: ascii text
10.218.200.132.reset...
is there a way to define a unix library inside the system() function ?
#! /usr/local/bin/perl -w
use lib '/store/eng/tools/health.lib';
sub DGT {
system (". /store/eng/tools/health.lib;");
}
&DGT
IOS (tm) 2500 Software (C2500-INS-L), Version 12.0(14a), RELEASE SOFTWARE (fc1)
if var = "IOS (tm) 2500 Software (C2500-INS-L), Version 12.0(14a), RELEASE SOFTWARE (fc1)"
What is the best way to isolate only 12.0(14a) ?
The shell way would be sumtin line
echo "$var" | sed 's/.*ersion //g...
There once lived a MS program that would easily automate point and click operations. For instance.
If I wanted to modify my volume settings, I would launch this application, go through the motions, those motions would be recorded and packaged as an executable.
Any ideas .. I thought it might...
I have the following script that works ok with one excpetion, It terminates prematurely. How do I tell the script to wait until the device is done doing its thing ?
#!/usr/local/bin/expect --
#log_user 0
#exp_internal 1
#spawn $env(SHELL)
#log_file -noappend logit
puts "[exec clear]"
#set nam...
enterprises.9.2.10.12.146.170.71.103: Bad variable type ("=")
is recvd when trying to update a router ios from tftp server
snmpset -c K3ys3rS0z3! 10.204.143.241 .1.3.6.1.4.1.9.2.10.12.16.170.71.103 s c1700-adventerprisek9-mz.123-20.bin
enterprises.9.2.10.12.146.170.71.103 =...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.