Search Results

awk -vRS= '{gsub(/\n/, " ")}1' INPUTFILE

What about AIX, HP, Solaris - they do not have -d option for date.

No. My version is the right. :p

Easy
DATE=20160120; echo $DATE | sed 's/[0-9]/& /g' | tr 0-9 a-k |
awk '{print $5, $6, $7, $8, $3, $4}' | sed 's/ //g' |
sed 's/./&-/2; s/./&-/5' | tr a-k 0-9

A work for sed.

Maybe something like this?

for x in a b c; do echo somestring > $x ;done # for testing

[ `grep -l somestring a b c | wc -l` -eq `ls a b c | wc -l` ] && echo 'All'
All

If you can use lynx then
lynx -dump URL
produces a good text output of a page. Every link on the page goes to References section in the end of the output.

With GNU utils everything is simpler but well... AIX 6

echo '20170001
20319900
20110232
20000001
20160230
20160229' | while read d; do
date -d$d '+%Y%m%d'; done
date: invalid date...

I learnt sed here (http://www.catonmat.net/blog/sed-one-liners-explained-part-one/) (but I read something before - this (http://www.grymoire.com/Unix/Sed.html) is good.)

Yes it's a good one.
perl -e '
require Net::IP;
$str = "2620:0:2d0:200:0:0:0:7";
$ip = new Net::IP($str, 6);
print $ip->print, "\n";
'
2620:0:2d0:200::7/128

GNU sed with "-E" (or -r - they are the same) option

For solaris this should work

sed 's!^\([^:]*\):[^=]*=\(.*\)!\1 \2!'

Try it (GNU sed):
sed -E 's/(^[^:]+):[^=]+=(.*)/\1 \2/'

Your expression is a mess.

And why don't use cat -n (or less -N, or nl) :)

head -n5 file; (tail -n+6 file | cat -n)

Why not
grep -B2 5555 | head -1
(-B, not -A)

---

And yes, this is a GNU grep extension (thanks, Corona688).

Try:
1. Use ordinary quotes instead of double ones.
2. Insert a literal newline after "i" command.

sed -e 'i\
H,0001' -e 's/$/,1,2/' abc > abc.tmp

awk '
{ a = a $0 }
/\{\}$/ { print a; a = ""; next }' FILE

cat FILE
I have a
pen and
notebook.

I have a
pen and
notebook.
~
perl -00 -pe 's/\n/ /g; s/ $/\n/' FILE
I have a...

var=`perl -MList::Util=shuffle -le '@s = shuffle (a..z, 0..9); print @s[0..7]'`

cat FILE | paste - - | sed 's/ Name//'

ARRAY=(*.dmg)

perl -0777 -ne 's/\s+/ /g;
print "$_\n" for /\d+\*\*\*.*?(?=\d+\*\*\*|$)/msg' FILE

Sorry. Add '-a' :

find /root/folder/ -maxdepth 1 -a type -d

your folder :)

"-type d" means "find" command will find only directories (folders).

Try:
perl -0777 -ne 's/\s+/ /g;
print "$_\n" for /\d\*\*\*.*?(?=\d\*\*\*|$)/msg' FILE

Try
find FOLDER -maxdepth 1 type -d
instead of
ls -l FOLDER

Oh... Well, I didn't notice. But I think it's impossible without additional information - how should the program determine what field is absent? Is the second field always present and it is TIPxxx?