перечитать таблицу разделов

 blockdev --rereadpt /dev/sdb

public ipv6 dns

Живые
Hurricane Electric

• ordns.he.net: 2001:470:20::2 (globally anycasted in 11 countries)

ISC

• f.6to4-servers.net: 2001:4F8:0:2::14

И еще куча дохлых
http://www.getipv6.info/index.php/DNS_and_Naming_Issues#Recursive_DNS_server

тонкости regexp в sed

http://blog.perlover.com/2009/10/29/sed-regexp/

отличия:

В языке Perl	В sed редакторе	Пояснение
(…)	\(…\)	Группировка
{X,Y}	\{X,Y\}	Заданный множитель
+	\+	Повторитель – один и более раз
?	\?	Повторитель – один или ноль раз
\bfoo\b	\	поиск ‘foo’ с границами слова
$1, $2	\1, \2	Подмена на группу

монтируем qcow образ в debian

apt-get install kvm

modprobe nbd max_part=8

kvm-nbd --connect=/dev/nbd0 ubuntu.10-10.x86-64.20101010.qcow

fdisk -l /dev/nbd0

Disk /dev/nbd0: 10.4 GB, 10485760000 bytes

4 heads, 32 sectors/track, 160000 cylinders

Units = cylinders of 128 * 512 = 65536 bytes

Disk identifier: 0x00013a61

     Device Boot      Start         End      Blocks   Id  System

/dev/nbd0p1               1      160000    10239984   83  Linux

mount /dev/nbd0p1 /mnt/test

ls /mnt/test/

bin   dev  home        lib    lost+found  mnt  proc  sbin     srv  tmp  var

boot  etc  initrd.img  lib64  media       opt  root  selinux  sys  usr  vmlinuz

umount /mnt/test

 kvm-nbd -d /dev/nbd0

/dev/nbd0 disconnected

mount loop offset

losetup --find --offset 512 file

losetup -a

mkfs.ext3 /dev/loop1

losetup -d /dev/loop1

http://wiki.eeeuser.com/howtocustomrestoreimage:pt2mkcustomimage

mtop/mytop in centos

mtop (Mysql Top)

http://packages.sw.be/mtop/

yum -y install perl-Curses
wget http://packages.sw.be/mtop/mtop-0.6.6-1.2.el5.rf.noarch.rpm
rpm -ivh mtop-0.6.6-1.2.el5.rf.noarch.rpm

yum -y install perl-TermReadKey perl-DBD-MySQL perl-DBI perl-Curses
wget http://packages.sw.be/mytop/mytop-1.4-2.el5.rf.noarch.rpm
rpm -ivh mytop-1.4-2.el5.rf.noarch.rpm

mytop -u root --prompt -d mysql

puppet replace some lines in files

http://projects.puppetlabs.com/projects/1/wiki/Simple_Text_Patterns

define replace($file, $pattern, $replacement) { 
  exec { "/usr/bin/perl -pi -e 's/$pattern/$replacement/' '$file'": 
      onlyif => "/usr/bin/perl -ne 'BEGIN { \$ret = 1; } \$ret = 0 if 
/$pattern/ && ! /$replacement/ ; END { exit \$ret; }' '$file'", 
   } 

} 

Example:
 
replace { "/etc/bashrc": 
   file => "/etc/bashrc", 
   pattern => "PS1", 
   replacement => "PS1 DOMAINA.COM" 
}