i have this method in csh that check for file exist.
#check that file exists
if ( ! -e $6$5 ) then
echo $6$5 Not Found
exit 8
endif
however i wanted in to be in just sh. so i change the code to:
if ; then
echo $6$5 Not Found
exit 8
fi
I get error... (1 Reply)
Hi All,
I am trying to put the csh variable into a perl.
In the below case, i am trying to put the csh variable "var" into my perl code. I tried to use '"$var"' but i don;t think it works.
Can anybody help me pls?
#!/bin/csh
set var = `echo "xxx"`
perl myperlcode.pl file
... (9 Replies)
Hi Everyone,
I have a body of code that I'd like to know how to convert to a csh file.
In Unix, under a directory, I wish to ls into each of its subdirectories:
In Unix prompt I type
foreach i(*)
foreach? ls $i
foreach? end
however, when I try to store this body of code in .csh:
... (2 Replies)
Hi All,
Could any one of you give me a hand to convert the following line of codes from .sh to .csh please ?
proc_id=`fuser /tmp/test`
if
then
echo "File is not being used by any thing"
fi
if
then
echo "File is being used... please wait"
sleep 1
fi
Regards.
---------- Post... (1 Reply)
Hi all,
Not sure if this should be in the programming forum, but I believe it will get more response under the Shell Programming and Scripting FORUM.
Am trying to write a customized df script in Perl and need some help with regards to using arrays and file handlers.
At the moment am... (3 Replies)
Dear all
I am installing some eda software using script. My OS is ubuntu 10.04 and the eda software writing in csh. Since ubuntu reading script file in sh writting. I need someone can help me to convert some definition in script from csh to sh. Below is part of script
set archinfo =... (3 Replies)
Hi,
I am currently using the below code and it throws an error saying badly placed ()'s. I am not sure if this right way to convert html to PDF, please help..I am using C-shell script
system ("../html2doc pdf 1000 portrait html$prnfile.html $prnfile.pdf ")
print "Content-type:application/pdf... (7 Replies)
Discussion started by: lakers646
7 Replies
LEARN ABOUT DEBIAN
aspect::advice::around
Aspect::Advice::Around(3pm) User Contributed Perl Documentation Aspect::Advice::Around(3pm)NAME
Aspect::Advice::Around - Execute code both before and after a function
SYNOPSIS
use Aspect;
around {
# Trace all calls to your module
print STDERR "Called my function " . $_->sub_name . "
";
# Lexically alter a global for this function
local $MyModule::MAXSIZE = 1000;
# Continue and execute the function
$_->run_original;
# Suppress exceptions for the call
$_->return_value(1) if $_->exception;
} call qr/^ MyModule::w+ $/;
DESCRIPTION
The "around" advice type is used to execute code on either side of a function, allowing deep and precise control of how the function will
be called when none of the other advice types are good enough.
Using "around" advice is also critical if you want to lexically alter the environment in which the call will be made (as in the example
above where a global variable is temporarily changed).
This advice type is also the most computationally expensive to run, so if your problem can be solved with the use of a different advice
type, particularly "before", you should use that instead.
Please note that unlike the other advice types, your code in "around" is required to trigger the execution of the target function yourself
with the "proceed" method. If you do not "proceed" and also do not set either a "return_value" or "exception", the function call will
return "undef" in scalar context or the null list "()" in list context.
AUTHORS
Adam Kennedy <adamk@cpan.org>
COPYRIGHT AND LICENSE
Copyright 2010 Adam Kennedy.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.14.2 2012-02-01 Aspect::Advice::Around(3pm)