Search Results

Check my earlier post now.
$ cat mach.pl
#!/usr/bin/perl

if (-t STDIN) { die "Input from terminal not allowed\n" }

while( defined($line = <STDIN>) ) {
chomp($line);
print...

the unix command "head" is made for that type of operation. Use the following operation.

to remove the last two line of a file use:

head -n-2 yourfile

Hi msabhi, perl does have a file rename operator, if you'd forgotten about it.

IF you start testing methods on a file be aware of the effect file caching by the OS and disk controllers. You will get completely bogus results if you are not aware of this. I/O wait time is the...

Thanks msabhi. You been very helpful.

Everything in awk has the form condition{action}. If the condition evaluates to 1 then the action is performed. If the condition is omitted then the default condition is 1, so the action is always...

./master.pl '$333'

The pattern START will, of course, match START3. What strings do you want to match?
------

awk '/START3/{p=1}p' file

No, it did not. You just did not notice the error. A comma is still allowed even though it's not on your list of allowed characters.

The portions highlighted in red represent ranges of characters,...

How about this update:

awk '
FNR!=NR&&FNR==1 {
printf "MSISDN,IMSI,STATE,NAM"
PROCINFO["sorted_in"] = "@ind_str_asc"
for(i in tags) printf ",%s", i;
printf...

Thanks for your effort msabhi, unfortunately both commands doesn't work and the response from oracle is still in two lines!
But hey! Don't waste more time ;) , I'll put the result in one line from...

Or sed:
sed 's/\(..:..:..\)\.0/\1/g' infile

(the . before the 0 should be escaped)

Try this:
awk 'FNR == NR { # Accumulate records from 1st file.
f1[++n1] = $0
low1[n1] = $4 - 100
mid1[n1] = $4
high1[n1] = $4 + 100
next
}
{ #...

[/quote]That almost works. You don't need (or want) the asterisk in a call to gsub(). It matches every string of zero or more matches, which in this case effectively adds a space before any of the...

awk -F\| 'BEGIN{OFS=FS} {gsub(/,/,q","q,$2);sub(/^/,q,$2);sub(/$/,q,$2)}1' q=\' infile

Try:
awk -F, 'NR==FNR{a[$1];next}$1 in a' file2 file1