Thanks for the suggestion Thomas. Its working fine now. <div class="gmail_quote">On Wed, Jan 28, 2009 at 6:56 PM, Thomas Guyot-Sionnest <<a href="mailto:dermoth@aei.ca">dermoth@aei.ca</a>> wrote: <blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">-----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 <div class="Ih2E3d"> shadih rahman wrote: > Can someone please give me an example how to submit external command > using perl script. I am trying to do this and its now working. The > command I am passing to named pipe is something like this. Thanks > "ACKNOWLEDGE_HOST_PROBLEM; > hostname;1;1;1;1;sr2690;testing > "1233162775 > > > my code is like this. > > > #!/usr/bin/perl > #use strict; > #use Getopt::Long qw(:config no_ignore_case); > use warnings; > use Data::Dumper; > > use Getopt::Long ; > > my ($action, $host, $service, $username, $comment, $HELP); > my $now=`date +%s`; > chomp ( $now ); </div># Easier/portable (you could also call time() directly in the printf below instead of using a variable): my $time = time() <div class="Ih2E3d"> > my $commandfile='/var/log/nagios/rw/nagios.cmd'; > > open CF, ">$commandfile" or die $!; </div>I'd suggest opening the pipe only when you want to write to it, or at least after parsing the arguments. Ex. you could open and close it in the send_to_named_pipe function. > > [...] <div class="Ih2E3d">> > sub send_to_named_pipe { > my ($command ) = @_; > chomp ( $command ); > > if ( defined ( $command ) ) { > print CF "\"$command\n\"$now"; </div># I guess you meant something like this: printf CF "[%i] %s\n", $now, $command; > > [...] > Anyhow, if you're still stuck try outputing to a standard file, then compare the lines you get with known working commands. - -- Thomas -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.7 (MingW32) Comment: Using GnuPG with Mozilla - <a href="http://enigmail.mozdev.org" target="_blank">http://enigmail.mozdev.org</a> iD8DBQFJgKpc6dZ+Kt5BchYRAq2eAJ9L+1+ssz+ntkmGFRY/mrbD2XLdQgCgpZGl qCsSxMrK30Kg6ydRqDwGefQ= =eRMt -----END PGP SIGNATURE----- ------------------------------------------------------------------------------ This SF.net email is sponsored by: SourcForge Community SourceForge wants to tell your story. <a href="http://p.sf.net/sfu/sf-spreadtheword" target="_blank">http://p.sf.net/sfu/sf-spreadtheword</a> _______________________________________________ Nagios-devel mailing list <a href="mailto:Nagios-devel@lists.sourceforge.net">Nagios-devel@lists.sourceforge.net</a> <a href="https://lists.sourceforge.net/lists/listinfo/nagios-devel" target="_blank">https://lists.sourceforge.net/lists/listinfo/nagios-devel</a> </blockquote></div> -- Cordially, Shadhin Rahman