03-24-2011
We can't tell why it's not working without more information. Any error messages, etc would be good. And of course the perl code itself.
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
I have a very basic script that essentially sends a log file, via FTP, to a backup server. My cron entry to run this every night is:
55 23 * * * /usr/bin/archive_logs
The script runs perfectly when executed manually, and actually worked via cron for about three weeks. However, it mysteriously... (3 Replies)
Discussion started by: cdunavent
3 Replies
2. HP-UX
Hello All,
I am trying to connect to ftp server and get the files. Also i need to rename the file in other ftp dir.
rename method is not allowing me to rename the file in other dir. When i tried copy command by using net::FTP:FILE then perl says it is not installed.
Can some body help me to... (2 Replies)
Discussion started by: krsnadasa
2 Replies
3. Shell Programming and Scripting
Hi,
I am using below piece of code to get the size of the remote file.
$ftp->cwd($destination) or $error=$ftp->message;
if(!$error)
{
$ftp->put($file) or $error=$ftp->message;
print "FTP size = \n";
... (3 Replies)
Discussion started by: FarooqOnline
3 Replies
4. Programming
Dear community,
I'm driving crazy with a strange issue.
I have a simple script to transfer a file to a remote system:#!/bin/bash
echo "put /tmp/server.log" > /tmp/server1_transfer.sftp
sftp -b /tmp/server1_transfer.sftp user@10.99.1.2:Between client and server there is a SSH KEY, so if I run... (15 Replies)
Discussion started by: Lord Spectre
15 Replies
5. Shell Programming and Scripting
I am working with a sh script on a solaris 9 zone (sol 10 host) that grabs information to build the configuration command line. the variables Build64, SSLopt, CONFIGopt, and CC are populated in the script. the script includes
CC=`which gcc`
CONFIGopt=' --prefix=/ --exec-prefix=/usr... (8 Replies)
Discussion started by: oly_r
8 Replies
6. Shell Programming and Scripting
Hi,
On linux i have the below command working fine.
grep -o '<name>.*</name>' deploy.tmp | sed 's/\(<name>\|<\/name>\)//g' deploy.tmp
But the same is failing on Solaris
uname -a
SunOS mymac 5.10 Generic_150400-23 sun4v sparc sun4v
Can you tell me how can i get it work on Solaris ?... (6 Replies)
Discussion started by: mohtashims
6 Replies
7. Shell Programming and Scripting
On linux i have the below command working fine.
awk '/<app-deploy>/{A=1;++i} /<\/app-deploy>/{print >> "found"i".tmp";A=0} A{;print >> "found"i".tmp"}' deploy.xml
But the same is failing on Solaris
Output:
awk: syntax error near line 1
awk: bailing out near line 1
uname -a SunOS mymac 5.10... (5 Replies)
Discussion started by: mohtashims
5 Replies
8. Shell Programming and Scripting
Hi,
On Linux i get the desired ouput:
echo "<value>WEB_USER</value>" | sed 's/\(<value>\|<\/value>\)//g'Output:
Executing the same command on Solaris:
echo "<value>WEB_USER</value>" | sed 's/\(<value>\|<\/value>\)//g'Output:
I need to get the desired output on Solaris i.e. WEB_USER and... (4 Replies)
Discussion started by: mohtashims
4 Replies
9. Shell Programming and Scripting
Hi,
I am looking for a generic find command that works on both Linux and Solaris.
I have the below command that works fine on Linux but fails on solaris.find /web/config -type f '(' -name '*.txt' -or -name '*.xml' -name '*.pro' ')' Fails on SunOS mysolaris 5.10 Generic_150400-61 sun4v sparc... (1 Reply)
Discussion started by: mohtashims
1 Replies
10. Shell Programming and Scripting
I wish to replace "\\n" with a single white space.
The below does the job on command-line:
$ echo '/fin/app/scripts\\n/fin/app/01/sql' | sed -e 's#\\\\n# #g';
/fin/app/scripts /fin/app/01/sql
However, when i have the same code to a shell script it is not able to get me the same output:... (8 Replies)
Discussion started by: mohtashims
8 Replies
LEARN ABOUT DEBIAN
device::modem::usrobotics
Device::Modem::UsRobotics(3pm) User Contributed Perl Documentation Device::Modem::UsRobotics(3pm)
NAME
Device::Modem::UsRobotics - USR modems extensions to control self-mode
SYNOPSIS
use Device::Modem::UsRobotics;
my $modem = new Device::Modem::UsRobotics( port => '/dev/ttyS1' );
$modem->connect( baudrate => 9600 );
my %info = $modem->messages_info();
print "There are $info{unreleased_voice_msg} unread voice messages on $info{stored_voice_msg} total
";
print "There are $info{unreleased_fax_msg} unread fax messages on $info{stored_fax_msg} total
";
# Get details about message n. X
my %msg = $modem->message_info(1);
index type information attributes status day hour minute
callerid page addresshigh addresslow checksum
print 'This is a ', ($msg{type} == 2 ? 'voice' : 'fax'), 'message', "
";
print 'It came from no. ', $msg{callerid}, "
";
# ...
# Now clear all messages
$modem->clear_memory();
WARNING
This module is not documented yet, and it is a rough work in progress. Until now, it correctly reads voice/fax messages information, but
when saving voice messages to disk, sometimes they are incorrectly decoded.
So, if you need a working program, check out the good old TkUsr by Ludovic Drolez, unless you want to help develop
Device::Modem::UsRobotics.
DOCS TO BE COMPLETED FROM NOW.....
Yes, I'm a bad boy :-)
DESCRIPTION
Bla Bla Bla...
METHODS
clear_memory()
Used to permanently clear the memory space of the modem. There are separate memory spaces, one for voice/fax messages and one for user set-
tings. Examples:
$modem->clear_memory('user'); # or $modem->clear_memory(1)
$modem->clear_memory('messages'); # or $modem->clear_memory(2)
To clear both, you can use:
$modem->clear_memory('all'); # or $modem->clear_memory(0);
Parameters:
$memtype
String or integer that selects the type of memory to be cleared, where 0 is for "all", 1 is for "user" memory, 2 is for "messages" mem-
ory.
SUPPORT
Please feel free to contact me at my e-mail address cosimo@cpan.org for any information, to resolve problems you can encounter with this
module or for any kind of commercial support you may need.
AUTHOR
Cosimo Streppone, cosimo@cpan.org
COPYRIGHT
(C) 2004-2005 Cosimo Streppone, cosimo@cpan.org
This library is free software; you can only redistribute it and/or modify it under the same terms as Perl itself.
SEE ALSO
Device::Modem, perl
perl v5.8.8 2005-04-30 Device::Modem::UsRobotics(3pm)