General :: Write A Perl Script To Ping Multiple Server?

Jul 22, 2011

How to write a perl script to ping multiple server and if any server is down then we manually bring up the server within 3hours wehn it goes down and will display a message" server is up within 3hours" and if we are unable to bring the server up manually within 3 hours then we will display a message " unable to bring the server alive". Need perl script to display the message.

ADVERTISEMENT

Programming :: Write A Perl Script Which Will Give An Interactive Session To A User To Execute Command On The Server

Feb 25, 2011

I am trying to write a perl script which will give an interactive session to a user to execute command on the server. I have written a small script to do this :

Code: !/usr/bin/perl -w
use strict;
use Net::SSH::Perl;
my $host = '192.168.1.1';
my $username = 'user';
my $login_passwd = 'test123';

[Code]...

View 2 Replies View Related

General :: How To Write Perl Script To Catch All Content

Aug 5, 2010

I would like to know a how to write Perl script to catch all the content in between BEGIN: and END from input file could any body help?

View 9 Replies View Related

General :: Write A C Code To Ping IP Addresses Which Are Read From A Text File?

Aug 3, 2010

i need to write a c code to ping IP addresses which are read from a text file and need to log the response time in another text file.

View 4 Replies View Related

Networking :: Ping Multiple Devices Via Multiple NICs?

May 20, 2010

I have an old pentium 3 computer that has ~7 NICs installed. These NICs are attached to modems and other networking equipment. According to the linux ping page on computerhope.com, it seems that one could send a ping from a certain specified NIC. How would one go about this?

View 6 Replies View Related

General :: Give Write Permissions To Multiple Users On A Folder In Ubuntu?

May 9, 2011

There is a folder that is owned by user tomcat6: drwxr-xr-x 2 tomcat6 tomcat6 69632 2011-05-06 03:43 document. I want to allow another user (ruser) write permissions on document folder. The two users (tomcat6 and ruser) does not belong to same group. I have tried using setfacl: sudo setfacl -m u:ruser:rwx document

but this gives me setfacl: document: Operation not supported error.

View 1 Replies View Related

CentOS 5 Server :: Move 5.5 To /usr/bin/perl So Root Based On Perl 5.12.1?

Aug 11, 2010

I am new here and want to lern CentOS. Current I have installed CentOS 5.5 x64 and Perl 5.8.8. Now i have install Perl 5.12.1 which located to /usr/local/bin/perl. But how I can move it to /usr/bin/perl so root based on Perl 5.12.1?

View 7 Replies View Related

Programming :: Write Iptables Commands In Perl?

Jul 14, 2010

I've worked with iptables in shell, but now I need to write an iptables command with perl. here is my code that I've tried but it didn't work :

Code:
#!/usr/bin/perl
print "Content-type: text/html

[code]...

View 4 Replies View Related

Networking :: Can't Ping Past Gateway / Can Ping Server From Outside

Apr 29, 2010

So, I have an Virtual Machine running CentOS 5.4. It sits behind a hardware firewall which also does NAT'ing. I've set up plenty of these, so I know for sure the firewall and NAT rules are set up correctly. From the host, I can ping anything in my subnet and the gateway. But I can't ping anything else beyond the gateway. I can perform DNS queries and when I try to ping, it finds the appropriate IP address.But from the outside, I can ping the PUBLIC address (It's a 1 public to 1 private address NAT, not 1 public to multiple private). I've tried it with IPTABLES on and off, with no change.

View 11 Replies View Related

Ubuntu :: Write Ping Output To Txt File?

Jan 18, 2011

How do i write ping output to txt file?

View 3 Replies View Related

Networking :: Cannot Ping With Command - Ping IP - Address But Can Ping With - Ping IP -I Eth0

Jul 15, 2011

I am using an virtual machine. where I need to ping from one machine to another. earlier I was able to ping. But after going to google.com once, I cannot ping back to this machine.

But if I gave ping -I eth1 <IP> then I can ping.

I cannot install any package, so tell me solution which includes not installing any package.

View 2 Replies View Related

General :: Multiple Servers Or One Server With Multiple VMWare?

Feb 7, 2011

I'm looking at setting up a couple automated systems: Here are a few examples:

* Internal accounting system to download and process emails
* Public web server to visit

I could put each system on its own separate box -- for example, it's generally good practice to separate anything that external users have access to (such as a webserver) from internal processes such as accounting. Now, rather than dishing out the money for two separate servers, could I get away with just installing new instances of VMWare on the same box for each system?

To give you an idea, these are not large scale computationally sensitive systems. The accounting one is simply downloading and tallying emails, and the latter is just a webserver with maybe 5 hits per day on a good day. I could definitely pick up a new box for say $50, but I wanted to know the general practice of using VMWare on the same box versus two separate boxes.

View 2 Replies View Related

Programming :: Perl - Writing To File - Keep Open Or Only During Write?

May 24, 2011

i am working on this thread: [URL] if it is better to open a file every time i need to write to it or should i keep a file open the whole time and when i am done with the script, close it and sendmail it out?

Or i just thought of this: i could keep concatenating to a string and just sendmail when done.

View 2 Replies View Related

Programming :: Write A Small Perl Script To Collect Some Info From Mysql?

Oct 10, 2010

am running Centos 5.4 and would like to write a small perl script to collect some info from mysql.

so I went
yum install perl-DBI
yum install perl-DBD-mysql

then

nano perl.pl
---
#!/bin/perl
use Mysql;

[Code].....

Why can't perl find Mysql.pm? I guess because it doesn't exist as I ran find / -name Mysql.pm, and also could not find it.

shouldn't that file have been created and thus exist after I install perl-DBD-mysql?

View 6 Replies View Related

SUSE / Novell :: Write IPTABLES Script To Block The ICMP Ping?

Mar 13, 2010

I was trying to write IPTABLES script to block the ICMP ping using the below mentioned command in OpenSUSE 11.2 Doing this in VMware.....

iptables -A OUTPUT -o eth0 -p icmp -j DROP

& then I tried to ping the different computer & it didnt allow me to ping.
Then I deleted using the command -

iptables -D OUTPUT -o eth0 -p icmp -j DROP

then I couldnt ping also. Another thing I found is my firefox is not connecting to the internet as well, but before writing the script, I can connect to internet.

I did a "dhclient" & iptables -F....

View 6 Replies View Related

Programming :: Indexing Multiple Drives With Perl?

May 7, 2010

I have 4 separate drives, all un-RAIDed.Each drive has almost the same root directories, but different contents in each folder.

For example:

/mnt/sda/TV Shows/Lost/
/mnt/sdb/TV Shows/Your_Favorite_Show/

The goal is to have a single folder that has symlinks to all the files in each of the drives. Pretty much a poor man's JBOD. Previously, I had problems with conditions like 2 drives having the same sub folder contents, but I ended up solving that with the current script I'm using now.What I'm looking for now is speed. I'm very new to Perl and the script takes about 12 minutes to complete with the current drives.

Basically, the script makes a list of all directories and files in each drive. First, it makes the directories. I didn't use any validation because if a directory already exists, it simply won't make one. However, with the files, I used a hash to only keep the unique files. Then I use the key/value pairs with ln to create every link to the files only, not directories.

Code:

#!/usr/bin/perl
use warnings;
my @drives_to_sync = qw ( /mnt/sda/ /mnt/sdb/ /mnt/sdc/ /mnt/sdd/);

[code].....

View 2 Replies View Related

Programming :: Unable To Match Across Multiple Lines In Perl

May 11, 2011

I'm trying to split a text file into various parts. Everything in between "123" and "break" (including linebreaks) goes into the splitted file.

e.g. using this text file:

This should split into 4 files. However I'm only getting 2 files: one for the line "123break" and one for "123 blah break". The two occurrences that contain linebreaks are being ignored. The .* part of my match should capture linebreaks seeing that I'm using the /s modifier shouldn't it? Even when I use the match /(123 break)/gs it still doesn't capture the first occurrence. I'm using Perl v5.12.3 (from ActiveState) on Windows XP. The text file is also in Windows format.

Code listed below.

The above code generates two files Output_1.txt and Output_2.txt which contain "123break" and "123 blah break" respectively. I want it to generate four files.

View 4 Replies View Related

Programming :: Delete Multiple Lines In A File Using Perl?

Apr 15, 2011

I have a file looks like the following:

digraph topology
{
"192.168.3.254" -> "10.1.1.11"[label="1.000", style=solid];
"192.168.3.254" -> "10.1.1.12"[label="1.000", style=solid];

[code]...

Order of these lines are random... So I cannot delete line #19, for example... And you can see that top four lines I want to delete are pairs. So there might be some clever way to detect the lines, if a line has both "1.9" and "1.11", then delete the line... I am new to perl language. The following is the code I have now... I think I just need to write some code inside the while loop checking if I want to delete the line $dotline before I write to a NEW file.

Code:

#!/usr/bin/perl -w
$TOPPATH = "/tmp";
$NAME = "topology";
$FILENAME = "$TOPPATH/$NAME.dot";

[code]....

View 16 Replies View Related

Programming :: Perl - Multiple Child Processes In Parallel?

Sep 3, 2010

I'm looking for a way in Perl to be able to take a list of servers, ssh multiple commands to it and store the results. If I do this process serially, sometimes one server will hang the whole script and if it doesn't, it still takes hours to complete.

I'm thinking what I need to do is make a parent loop that calls out a separate process that passes the server name to the child sub process and then executes all the commands I have defined in its own process. If one server 'hangs', at least that won't stop the script from doing all the other servers in the list.

I'm guessing using the fork() command would serve me best, however, all the online descriptions I have found have been vague at best.

View 4 Replies View Related

General :: Cannot Connect To Server But Can Ping To Server

Dec 26, 2010

I created an account called adminftp on a local Linux server Centos.Added this user to FTP group.When I use Filzilla from another computer in the same network, it cannot connect to the server but I can ping to the server.

View 6 Replies View Related

General :: Ping - Gives Unknown Host Error - Ping To LAN Address Works Fine

May 13, 2011

Even ping google's ip address doesn't work. unknown host error using backtrack4 able to browse net with these settings.

My network settings:

What's the problem with these settings...

View 10 Replies View Related

CentOS 5 Server :: Unable To Give "Perl Path" To Run Perl CGI Script

Jun 2, 2011

I am unable to run perl-cgi script in my cent os Apache server. I have used locate perl command in terminal window and it gives following result:

[code]....

tell which is the path to perl for example "usr/bin perl"

View 13 Replies View Related

Programming :: Perl Regex Not Matching Across Multiple Lines Despite Ms Flags / Fix It?

Aug 16, 2010

I have written a regular expression (tested in regexpal and regextester alpha something) with which I want to replace something like code...

but it only matches functions which occupy one line only, despite my tests showing multiple line matching in javascript testers online and using the m and s flags (which should make it multi line no?)

View 14 Replies View Related

Programming :: Perl's Length() Counts Umlauts Multiple Times

Dec 14, 2010

I'm programming some skript to get statistical information about some texts. This includes calculating the mean of word lengths.Unfortunately, Umlauts count as two characters. In the example below the output is 9, it should be 6.

sincercly, Max

Code:
#!/usr/bin/perl
use POSIX;
use locale;
my $test = length("ABC���");
print $test;

View 4 Replies View Related

Programming :: Convert Multiple File In Directory - Ascii To Hex In Perl ?

Apr 9, 2011

I have found a perl script that can convert single file: ascii to hex.

However I have thousand of file that I want to convert from ascii to hex.

Here is the perl script that convert single ascii file to hex in single line:

Quote:

So I would like to read multiple file from a directory.

Then the file will be have same name file with hex data.

Here is sample of the read and write directory file.

Quote:

View 3 Replies View Related

General :: Bonding - Cant Ping The Gateway Or Any Other Server

Jun 14, 2011

I have configured bonding on 64 bit centos 5.4 I have to put the machine to a different VLAN for that i did the Ip change and restated the network. but i cant ping the gateway or any other server in that network. the cofig files are as follows

vi /etc/modprobe.conf
alias eth0 bnx2
alias eth1 bnx2
alias scsi_hostadapter aacraid
alias scsi_hostadapter1 ata_piix
alias usb-controller ehci-hcd
alias usb-controller1 uhci-hcd
alias bond0 bonding
options bonding mode=1 miimon=100
[Code].....

View 5 Replies View Related

Programming :: [Perl] Fail To Sort A File With 300,000 Lines By Multiple Columns?

Nov 10, 2009

Each line of the file I am sorting is in the following format:

<url> <month> <day>

For example:

[URL]

I wrote the following to sort:

Code:

#!/usr/bin/perl
$in = shift;
chomp($in);

[code]....

The script worked fine for my small testing files, but failed in my input file. The input file is 18MB and containing more than 300,000 lines. The output will contains some lines like that:

url_one 10 1
url_two 10 1
url_three 10 3
url_four 10 1

Is that because my file is too big for perl to handle ?

View 10 Replies View Related

General :: Unable To Ping - REHL Client / Server

Jul 12, 2010

I have two linux machines (machine1(rhel client) and machine2 (rhel server)). I am able to login the machine2 from machine1 but I am unable to ping machine1 from machine2. Firewall is stopped in both machine.

View 6 Replies View Related

General :: Unable To Ping A External Mail Server

Jan 13, 2011

I am able to traceroute but unable to ping a external mail server ? What could be the reason ?

View 3 Replies View Related

General :: Run A Perl Script Automatically After A Ubuntu Server Has Booted Up?

Jun 21, 2010

I wrote a Perl script which will serve as a daemon, so I'd like to let the OS (in my case, Ubuntu Linux) automatically run my Perl script after it has booted up.

How can I do that?

View 1 Replies View Related

General :: Error An Not Ping Vhosts Server From My Local Machine

Mar 30, 2010

I just configured vhost server in my linux server. When trying to access the open source (SugarCRM) application running on it, its giving me the error message that i am not connected to internet. I have restarted apache by no luck.

View 1 Replies View Related

General :: Ping Similar Command For Checking Server Services?

Jan 25, 2011

I am looking for a command line utility like ping that can use for checking appropriate services on a server . I do not want do any port scan . I just want to use it for checking apache , mail,ftp and other services on a server if they are running or down.

View 3 Replies View Related

General :: Bash Script To Continuously Ping Server And Send Email

May 7, 2010

I'm trying to write a script that will continuously ping a server and then send out an email when the server is down, and then when it is back up. Then, continuing with monitoring. I would like to not run this in cron, because I don't want to script to run with multiple instances.

For example,
Ping a server every minute.
-If successful, do nothing.
-If failed to ping, then send out email stating that server is down.
-Once ping is successful, then send out email stating that server is up.

I only want it to send an email once after a failure, so the end user isn't get an email every minute that it fails. Once it is successful, then send the email (one time), stating that the server is up. Then, continue to ping and if fails again, repeat the process.

View 4 Replies View Related

Programming :: Write A .sh Script That Allows To Run Multiple Other

Jan 30, 2010

I'm trying to write a .sh script that allows me to run multiple other .sh scripts at once.

My problem occurs within a Variable:

I have set

S1 to S7 to be the name of the .sh

A="7"
B="S$A"
C="$S$A" <- and this is where my problem is

I want C to be the content of S7 till S1 but if I run this line it will of course look for the content of S and link it with the content of A.

How can I correct this?

Edit:

WHERE="/home/X/Y/"
SH=".sh";
A="7";
B="S$A";
C="$B";

[Code].....

View 6 Replies View Related

Programming :: How To Write Programs In Multiple Languages?

Aug 18, 2009

Well I have been interested in programming for a while, and just found out about Linux and Unix. I started out with Java, but now I know I bunch: Flash, C++, C and others. I was working on a mac so I made a few flash games then started to work on iPhone games. I was board one day and I found out about Unix and I thought that would be something else to try.So in an attempt to learn about Unix I have been reading different articles about it, and have heard of using different languages in one program. The article I was reading didn't give any examples, and it assumed the reader has programmed Unix before.

So how do you write programs in multiple languages, which languages would you use, and why would you want to do that?

View 3 Replies View Related

ADVERTISEMENT