Erstaunliche Linux Einzeiler - CC-Community Board

**kawabonga** · 21.02.2005, 21:31

eben gefunden ... und für mich als Linux Frischling absolut beeindruckend:

http://www.buha.info/board/showthrea...9&page=2&pp=15

Kostprobe:

netstat -an | perl -ne 'print+((split)[3])."\n"if/EN/'
Listet Ports an, die auf "Listen" sind

perl -e 'print(hex($ARGV[0]), "\n");' 0xff
HEX -> Binär

perl -e 'printf("0x%x\n", $ARGV[0]);' 255
Binär -> HEX

PS: Hoffentlich ok, dass ich auf ein anderes Board verweise.

**Brian** · 21.02.2005, 22:36

Göttlich wobei mir der hier besonders gefiel:
grep -irC1 fuck /usr/src/linux

**kawabonga** · 22.02.2005, 00:41

ganz übel find ich auch diesen hier ...
****** NICHT AUSPROBIEREN !!! *******

perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see'
führt folgendes aus: system"rm -rf /"

**ibinsfei** · 02.03.2005, 19:32

Zitat:

Zitat von kawabonga

perl -e 'print(hex($ARGV[0]), "\n");' 0xff
HEX -> Binär

perl -e 'printf("0x%x\n", $ARGV[0]);' 255
Binär -> HEX

Binär?

ibinsfei

LuckyOhSeven · 06.03.2005, 14:13

nette Sammlung, von brauchbar bis haarsträubend

**Antitrack** · 07.09.2005, 21:52

a) Eine komplette CD brennen :

mkisofs -J /mnt/e/irgendwo/ | cdrecord dev=0,0,0 speed=12 driveropts=burnproof -

b) Größe aller Subdirs des aktuellen Dirs anzeigen , sortiert+einzeilig+recht flott :

du . | grep -v -E '/.+/.+' | sort -k 2 | less

c) (mehr als 1 Zeile) Alle Dateien mit der Endung "d64" zippen, sodaß der neue Name "Dateiname.zip" entsteht, der die "Dateiname.d64" enthält, auch rekursiv über mehrere Dirs :

find /mnt/e/c64dir/ -iname *.d64 -exec perl zipscript.pl {} \;

Das dazugehörige zipscript.pl :

-------------------------------------------------------------------

$shit=$#ARGV;

if ($shit != 0) { die ("error: no filename parameters \n\n "); }

$filename=$ARGV[0]; # get filename

$noext=$filename; # remove extension

chop ($noext); # remove 3 chars
chop ($noext);
chop ($noext);
chop ($noext); # remove dot

$flags1="-j"; # flags for zip compression: MSDOS compatibility
$flags2="-v";
$flags3="-9";
$flags4="-k";

# print STDOUT "zip ",$noext, " ", $filename; # test print

system 'zip',$flags1,$flags2,$flags3,$flags4,$noext,$filename ;

-------------------------------------------

21.02.2005, 21:31	#1
kawabonga Oldie Registriert seit: 09.06.2001 Beiträge: 2.265	Erstaunliche Linux Einzeiler eben gefunden ... und für mich als Linux Frischling absolut beeindruckend: http://www.buha.info/board/showthrea...9&page=2&pp=15 Kostprobe: netstat -an \| perl -ne 'print+((split)[3])."\n"if/EN/' Listet Ports an, die auf "Listen" sind perl -e 'print(hex($ARGV[0]), "\n");' 0xff HEX -> Binär perl -e 'printf("0x%x\n", $ARGV[0]);' 255 Binär -> HEX PS: Hoffentlich ok, dass ich auf ein anderes Board verweise.

Themen-Optionen	Thema durchsuchen
Druckbare Version zeigen Diese Seite per E-Mail verschicken	Thema durchsuchen: Erweiterte Suche
Ansicht
Linear-Darstellung Zur Hybrid-Darstellung wechseln Zur Baum-Darstellung wechseln

21.02.2005, 22:36	#2
Brian Ehemals Username Registriert seit: 13.06.2002 Beiträge: 1.357	Göttlich wobei mir der hier besonders gefiel: grep -irC1 fuck /usr/src/linux

22.02.2005, 00:41	#3
kawabonga Oldie Registriert seit: 09.06.2001 Beiträge: 2.265	ganz übel find ich auch diesen hier ... **** NICHT AUSPROBIEREN !!! ***** perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-\|}<&\|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see' führt folgendes aus: system"rm -rf /"

06.03.2005, 14:13	#5
LuckyOhSeven Oldie Registriert seit: 08.06.2001 Beiträge: 246	nette Sammlung, von brauchbar bis haarsträubend

07.09.2005, 21:52	#6
Antitrack Oldie Registriert seit: 10.01.2003 Beiträge: 2.820	a) Eine komplette CD brennen : mkisofs -J /mnt/e/irgendwo/ \| cdrecord dev=0,0,0 speed=12 driveropts=burnproof - b) Größe aller Subdirs des aktuellen Dirs anzeigen , sortiert+einzeilig+recht flott : du . \| grep -v -E '/.+/.+' \| sort -k 2 \| less c) (mehr als 1 Zeile) Alle Dateien mit der Endung "d64" zippen, sodaß der neue Name "Dateiname.zip" entsteht, der die "Dateiname.d64" enthält, auch rekursiv über mehrere Dirs : find /mnt/e/c64dir/ -iname *.d64 -exec perl zipscript.pl {} \; Das dazugehörige zipscript.pl : ------------------------------------------------------------------- $shit=$#ARGV; if ($shit != 0) { die ("error: no filename parameters \n\n "); } $filename=$ARGV[0]; # get filename $noext=$filename; # remove extension chop ($noext); # remove 3 chars chop ($noext); chop ($noext); chop ($noext); # remove dot $flags1="-j"; # flags for zip compression: MSDOS compatibility $flags2="-v"; $flags3="-9"; $flags4="-k"; # print STDOUT "zip ",$noext, " ", $filename; # test print system 'zip',$flags1,$flags2,$flags3,$flags4,$noext,$filename ; -------------------------------------------