08-26-2008
man perlvar will help you.
$@ is the error message from the last eval(). Period. It's null if there was no eval.
$! is what went wrong after the last call to the OS -- it's essentially from errno. It gets reset as soon as you do something that succeeds, like the statement "1;".
$? Is only after an external command, pipeline, system(), or wait(), it contains the error the last command returned, shifted left 8 bits.
About the error message, it could be Net::FTP is printing out to stderr. You can instantiate the object with a Debug parameter...
new Net::FTP( $hostname, ( 'Debug'=> 10 ));
10 More Discussions You Might Find Interesting
1. UNIX for Advanced & Expert Users
Does exception handling exist in any UNIX enviornment? I develop on Windows MSVC++ land and need to port to UNIX. (1 Reply)
Discussion started by: RichardS
1 Replies
2. UNIX for Advanced & Expert Users
Hi, I am trying to use swremove to remove some old software packages before an upgrade. I keep getting the same error below. I have restarted swagent, i have killed the swagent process and started it, and I have restarted the entire system. I have now run out of ideas. Anyone know what the problem... (0 Replies)
Discussion started by: ejbrever
0 Replies
3. HP-UX
Hi, I am trying to use swremove to remove some old software packages before an upgrade. I keep getting the same error below. I have restarted swagent, i have killed the swagent process and started it, and I have restarted the entire system. I have now run out of ideas. Anyone know what the problem... (2 Replies)
Discussion started by: ejbrever
2 Replies
4. UNIX for Dummies Questions & Answers
Dear friends,
I am transferring some files to a windows system from Unix m/c thru FTP Script given below.
echo "open $host
quote USER $userid
quote PASS $pwd
$verbose
$type
cd $dir
bin
put $file
close
quit"|$ftp... (0 Replies)
Discussion started by: Vijayakumarpc
0 Replies
5. Linux
I hope to post in the right forum, otherwise I apologize for this.
if a MMU exception is caused by a process which tries to access to other memory segment (out of its own address space) what the kernel does in this case ?
maybe kernel kills the "bad" process ? (2 Replies)
Discussion started by: Puntino
2 Replies
6. Shell Programming and Scripting
Sometimes when I try to use curl to upload to an ftp server, I get the message:
$curl -T file.wmv ftp.eu.filesonic.com --user user:password
curl: (8) Got a 421 ftp-server response when 220 was expected
How do I get the script to try again if I get the message curl: (8)? (2 Replies)
Discussion started by: locoroco
2 Replies
7. Programming
Hello All,
I have a question ....which I am totally confused about!
If I have a fxn foo in a program which returns a logical value. But it has a posssiblity to throw some exception.
Now my exception handler returns a value as a string stating why the exception occured.
But my... (1 Reply)
Discussion started by: mind@work
1 Replies
8. Solaris
Hi all,
An application works well under 2.6 but under 7 it gives TEXT_IO exceptions. (Is_Open, Check_Is_Open, Get_Line procedures). Any idea?
Regards (3 Replies)
Discussion started by: endoavour
3 Replies
9. Shell Programming and Scripting
I have following file:
NAME=ora.DG1.svc
TYPE=ora.service.type
CARDINALITY_ID=1
TARGET=ONLINE
STATE=ONLINE
NAME=ora.orlene.DG2.svc
TYPE=ora.service.type
CARDINALITY_ID=1
TARGET=ONLINE
STATE=OFFLINE
NAME=ora.MN.acfs
TYPE=ora.registry.acfs.type
TARGET=ONLINE (4 Replies)
Discussion started by: rcc50886
4 Replies
10. Shell Programming and Scripting
Hi Folks,
please advise , I have logs generated on unix machine at location /ops/opt/aaa/bvg.log , now sometimes there come exception in these logs also, so I want to write such a script such that it should continuously monitor these logs and whenever any exception comes that is it try to find... (3 Replies)
Discussion started by: tuntun27272727
3 Replies
LEARN ABOUT DEBIAN
text::micromason::debug
MicroMason::Debug(3pm) User Contributed Perl Documentation MicroMason::Debug(3pm)
NAME
Text::MicroMason::Debug - Provide developer info via warn
SYNOPSIS
Instead of using this class directly, pass its name to be mixed in:
use Text::MicroMason;
my $mason = Text::MicroMason->new( -Debug );
Use the standard compile and execute methods to parse and evalute templates:
print $mason->compile( text=>$template )->( @%args );
print $mason->execute( text=>$template, @args );
You'll see lots of warning output on STDERR:
MicroMason Debug create: Text::MicroMason::Base::AUTO::Debug...
MicroMason Debug source: q(Hello <% $noun %>!)
MicroMason Debug lex: text, q(Hello ), expr, q( $noun ), text, q(!)
MicroMason Debug eval: sub { my @OUT; my $_out = sub { push ...
DESCRIPTION
This package provides numerous messages via warn for developer use when debugging templates built with Text::MicroMason.
Supported Attributes
debug
Activates debugging messages for many methods. Defaults to logging everything.
Can be set to 0 or 1 to log nothing or everything.
Alternately, set this to a hash reference containing values for the steps you are interested in to only log this items:
debug => { source => 1, eval => 1 }
You can also selectively surpress some warnings:
debug => { default => 1, source => 0, eval => 0 }
Private Methods
debug_msg
Called to provide a debugging message for developer reference. No output is produced unless the object's 'debug' flag is true.
SEE ALSO
For an overview of this templating framework, see Text::MicroMason.
This is a mixin class intended for use with Text::MicroMason::Base.
For distribution, installation, support, copyright and license information, see Text::MicroMason::Docs::ReadMe.
perl v5.10.1 2007-01-29 MicroMason::Debug(3pm)