Search Results

you can use awk,nawk or gawk:-




gawk '{for(i=2;i<=NF;i++){print $1,$i}}' FS="," OFS="," infile.txt > outfile.txt



BR
:D:D:D

another way:-

gawk '/^R/&&s{print s ; s=""}{s=s$0}END{printf s}' file.txt


o/p
R|This is line 1
R|This is line 2
R|This is line 3
R|This is line 4
R|This is line 5


BR
;););)

and to eliminate the space from beginning do the code:-

gawk '/^R/&&s{sub(/^[ ]/,"",s) ; print s ; s=""}{s=s" "$0}END{sub(/^[ ]/,"",s);printf s}' file.txt

huaihaizi3:-

what if "This is Line 1" is containing more than 4 args?

---------- Post updated at 18:01 ---------- Previous update was at 17:49 ----------

or even you can do below:-

gawk...

you can use nawk , awk , gawk:


nawk -F":" '{print $NF}' infile > outfile

you can do below if interested with one liner:-

perl -07 -wlpe 's/(.*)\s+~+/## $1/s ;' infile.txt

:D:D:D

you forget to escape \ with \.


sed 's/\\x0D/\\x0D \\x0A/g'

:D:D:D:D

FYI:-

A hard link can point only to a file and not to a directory, and only to a file existing on the same file system where the link itself is.
A symbolic link, in contrast, can point to a file...

kindly give the input and the desired output

---------- Post updated at 06:11 AM ---------- Previous update was at 05:27 AM ----------

use below , and write the code as you can see it in below...

if you want to use Perl for predefined date you can use below code:-


#!/usr/bin/perl -l

use Date::Parse;
print str2time("Mon Apr 18 16:45:00 UTC 2011"); #1303145100
print...

awk -F, 'FNR==NR{f1[$1]=$0;next}$2 in f1{print f1[$2],$0}' OFS="," file1 file2

use below:-



gawk -F"," '{ split($3,a,"\/") ; if ( a[2] < 10) {$3=a[3]a[1]"0"a[2]}
else {$3=a[3]a[1]a[2] }}1' OFS="," file.txt


:D:D:D:D

another try:-


perl -F"," -wlane '
(@a = @F) and next if $.==1 ;
$i = 0 ;
map { s/^\s+// ; push @{$_},$F[$i++] } @a ;
END {
map { $j=$_ ; map { print $_,"[$j]"," = ",${$_}[$j] } @a ;print...

use below:

form line to paragraphs:

perl -wlne '$_ =~ s/\s+/\n/g;print $_,"\n";' infile.txt > outfile.txt


for reverse:
from paragraphs to lines:

perl -00 -wne 's/\n/\t/g;print $_,"\n"'...

using Perl:-

perl -wlne 'printf "$1 " while (s/\"(.*?)\"//);' infile.txt

;););)

Really nice post , but I would like to suggest another technique using Perl:-


perl -wle '
open(IN , "<in.txt") or die "can not open$!\n" ;
open(OUT , "<out.txt") or die "can not open$!\n" ;...

if you don't have the -i option on sed use PERL code below:

perl -i -wlpe 's/TRASH_MAX_SIZE:1024/TRASH_MAX_SIZE:2040/;' config.ini

:b::b:

it is more simpler if you use associative array below:-

Note:- in solaris use nawk instead of awk.


awk 'NR==FNR{a[ int( substr($0,1,9) )] ; next}(FNR in a)' fileA fileB


BR
...