Hello -
I have a file that has the something like the following :
REM CREATE TABLE lots of text
REM table specifc creation text ;
REM ALTER TABLE lots of text
REM text specific to the the alter command
REM could be more lines of text;
What I need is to get all the lines for the ALTER... (2 Replies)
Hi Experts,
I have binary files contain an ID Line as:
:
:
$Header: FNDSCMON.fmb 115.6 2000/01/11 10:26:10 pkm ship$
:
:
where the ID Line format is:
$Header: <File_Name> <Version> <Last_update_date_time> pkm ship$
In this Example:
File_Name = FNDSCMON.fmb
Version = 115.6... (13 Replies)
Hi,
I need help. I have XML file as below
<a n="infoLevel">
<v s="true"/>
</a>
<a n="localAddr">
<v s="server.host.com"/>
</a>
<a n="ListenPort">
<v s="21111"/>
</a>
I need to find variable "ListenPort" in line and then replace... (4 Replies)
Hey,
I am gettin a bit crazy with my script. I have several input datas with the same name (5.ill) in different folders (daysim_01, daysim_02, etc.). The 4. column of each of the data has to be summed with each other and then hass to be written in one new file.
So file1:
1 1 0 1
2 1 1 2 ... (7 Replies)
I need to change the content of the line after I grep it.
The line is :
Date SNWD.I-1 (in) WTEQ.I-1 (in) PREC.I-1 (in) TOBS.I-1 (degC) TMAX.D-1 (degC) TMIN.D-1 (degC) TAVG.D-1 (degC)
I want to change the second column (SNWD.I-1(in)) to SNWD.I-1(m), how could I do that?
I use csh... (2 Replies)
Hi All,
I would like to print the content from the specific line of a file .
For example... i have file abc.txt which has 100 lines of code ,from this file i would like to print the content from 20,19,18th line......like that
Regards
Srikanth (4 Replies)
Hi,
I have urls in my input file like this
http://unix.com/abc/def
http://unix.com/kil/min
I want to use the / as separator and print the last content as another column like this
http://unix.com/abc/def def
http://unix.com/kil/min min
I was using awk -F option and then joining the... (3 Replies)
Hi I want to create output file which is having entries from source file in single line
a.txt
<output type="event">
<moduleId>abc</moduleId>
<errorCode>963016</errorCode>
<text>Test1</text>
</output>
... (2 Replies)
Discussion started by: aaysa123
2 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)