You probably want to do some kind of loop.
Note that there are some simpler ways of doing this, I merely took your flow and modified.
For instance, the output of each awk could >> (append) to you final file, saving a step.
Code:
# create a listing of the files to work on
# you might not need to do this, if the list already exists
ls *.txt >tmp_file_list
while read tmp_file
do
tr -A '\12' '\34' <${tmp_file} | tr -A '\177' '\12' | awk -v FILENAME=${tmp_file} '{printf "%s\34%s\n", FILENAME,$0}' >${tmp_file}_2
done<tmp_file_list
# concatenate all the files
cat *_2 > AllFilesAfterTrandAwk
Hi,
I have a script abc.sql which contains a word 'timestamp'.
I have another script xyz.txt genrated everyweek, which has a new timestamp value every week.
How do I replace the word 'timestamp' in script abc.sql with the value mentioned in the script xyz.txt, so that I can run the script... (3 Replies)
hey all,
i was just wondering if it was possible to to get data from user input , and parse it through sed to remove or add what that user has entered into a flat file?
do i need awk ?
any help is greatly appreciated
~shan2on (2 Replies)
in shell scripting there is extensive usage of
i> regular expression
ii>sed
iii>awk
can anyone tell me the suitable contexts ...i mean which one is suitable for what kind of operation.
like the reg-exp and sed seems to be doing the same job..i.e pattern matching (1 Reply)
Hi,
I have some files being sent to me that have dates in them in this format:
from
1/8/2011 15:14:20
and I need the dates in this format (mysql date format)
To
2011-01-08 15:14:20
all I have so far is the regexp that detects the format:
sed -r -e 's@\1/\2/\3\4\5\6]::$@do... (7 Replies)
I need help with sed and awk scripts to search for Symmetrix ID=000090009902 and then grep its child disk devices associated to the dead paths and display them only, so that those dead devices can be removed.
test01:/#powermt display dev=all
Pseudo name=hdiskpower0
Symmetrix ID=000090009902... (4 Replies)
I need to create a script to change a file depending of 3 conditions using a target as parameter...
first condition
<chamada>
<numeroTerminalOriginador>CALLER</numeroTerminalOriginador>
<imeiOriginador></imeiOriginador>
<cgiPrimeiraErbOriginador></cgiPrimeiraErbOriginador>... (2 Replies)
Hi evrybody
For those who are bored I suggest exercise for tail :)
There is "csv" string:
A,B,C,D,E,G
Desired output:
| (A) A | (A,B) B | (A,B,C) C | (A,B,C,D) D | (A,B,C,D,E) E | G
There are no whitespace characters at the beginning and end of the line. (7 Replies)
Discussion started by: nezabudka
7 Replies
LEARN ABOUT DEBIAN
io::async::timer::absolute
IO::Async::Timer::Absolute(3pm) User Contributed Perl Documentation IO::Async::Timer::Absolute(3pm)NAME
"IO::Async::Timer::Absolute" - event callback at a fixed future time
SYNOPSIS
use IO::Async::Timer::Absolute;
use POSIX qw( mktime );
use IO::Async::Loop;
my $loop = IO::Async::Loop->new;
my @time = gmtime;
my $timer = IO::Async::Timer::Absolute->new(
time => mktime( 0, 0, 0, $time[4]+1, $time[5], $time[6] ),
on_expire => sub {
print "It's midnight
";
$loop->stop;
},
);
$loop->add( $timer );
$loop->run;
DESCRIPTION
This subclass of IO::Async::Timer implements one-shot events at a fixed time in the future. The object waits for a given timestamp, and
invokes its callback at that point in the future.
For a "Timer" object that waits for a delay relative to the time it is started, see instead IO::Async::Timer::Countdown.
EVENTS
The following events are invoked, either using subclass methods or CODE references in parameters:
on_expire
Invoked when the timer expires.
PARAMETERS
The following named parameters may be passed to "new" or "configure":
on_expire => CODE
CODE reference for the "on_expire" event.
time => NUM
The epoch time at which the timer will expire.
Once constructed, the timer object will need to be added to the "Loop" before it will work.
Unlike other timers, it does not make sense to "start" this object, because its expiry time is absolute, and not relative to the time it is
started.
AUTHOR
Paul Evans <leonerd@leonerd.org.uk>
perl v5.14.2 2012-10-24 IO::Async::Timer::Absolute(3pm)