Hello,
I am trying to use AWK to print only the first field of numerous text files, and then overwrite these files. They are of the format 1*2,3,4,5. I have tried the following code (using tcsh):
foreach f (file1 file2 file3)
cat $f | awk -F'*' '{print $1}' > $f
end
However, I get very... (4 Replies)
I am new to unix and have pieced together two scripts that work independently.
The first checks all the filesystems and reports which are running low on space.
df -m | awk 'int($4) > 75 {
print $1 " has only " $3 "mb free from a total of " $2 ", this filesystem is
" $4 " full! \n"
}... (1 Reply)
Hey,
I know this is a stupid question, but it doesn't work.
I have a file with 10 lines and I want to pipe the content to awk and then print line 1 til 2 into another file and then line 3-4 ...
So my script looks like that, but doesn't work:
cat grid_ill.pts | awk '{
for (NR=1;NR<3;NR++)... (8 Replies)
I have two files which I would like to compare and then manipulate in a way.
File1:
pictures.txt 1.1 1.3
dance.txt 1.2 1.4
treehouse.txt 1.3 1.5
File2:
pictures.txt 1.5 ref2313 1.4 ref2345 1.3 ref5432 1.2 ref4244
dance.txt 1.6 ref2342 1.5 ref2352 1.4 ref0695 1.3 ref5738 1.2... (1 Reply)
Hi, everyone!
I have a file, when I print its $1 out it show several strings like this:
AABBCC
AEFJKLFG
FALEF
FAIWEHF
What I want to do is that, after output of each record, search the string in all files in the same folder, print out the record and file name.
This is what I want... (4 Replies)
Hi All,
I am new to AWK programming. I have the following for loop in my awk program.
cat printhtml.awk:
BEGIN
-------- <some code here>
END{
----------<some code here>
for(N=0; N<H; N++)
{
for(M=5; M<D; M++) print "\t" D "";
}
-----
}
... (2 Replies)
Hello, I currently have managed to get an awk function working inside a for loop that allows me to combine two files based on their headings but what I have not been able to do is print the output to files with variable names.
awk '
NR==FNR {a=$0; next}
/^>/ {$0 = $0" "a;}
... (2 Replies)
Hi
My Requirement is to take the sum of each column
below is the input file.
1 2 3 4
1 2 3 4
1 2 3 4
Initial i was using below command to achieve my desired result. however this was adding the row and not column.
i am not able understand why this is happening
awk... (1 Reply)
Hi all,
I was searching the net for a solution for my problem... unfortunately nothing so far.
I want to sort on more than on column tab delimited file and keep the line if in the column I sort there is no value, but for those who have a value I want them only unique.
I have tried the... (5 Replies)
Discussion started by: ksenia
5 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)