Hide

What's this?

commandlinefu.com is the place to record those command-line gems that you return to again and again.

Delete that bloated snippets file you've been using and share your personal repository with the world. That way others can gain from your CLI wisdom and you from theirs too. All commands can be commented on, discussed and voted up or down.

If you have a new feature suggestion or find a bug, please get in touch via http://commandlinefu.uservoice.com/

Get involved!

You can sign-in using OpenID credentials, or register a traditional username and password.

OpenID
or
Sign in Register

First-time OpenID users will be automatically assigned a username which can be changed after signing in.

Hide

Stay in the loop…

Follow the Tweets.

Every new command is wrapped in a tweet and posted to Twitter. Following the stream is a great way of staying abreast of the latest commands. For the more discerning, there are Twitter accounts for commands that get a minimum of 3 and 10 votes - that way only the great commands get tweeted.

» http://twitter.com/commandlinefu
» http://twitter.com/commandlinefu3
» http://twitter.com/commandlinefu10

Subscribe to the feeds.

Use your favourite RSS aggregator to stay in touch with the latest commands. There are feeds mirroring the 3 Twitter streams as well as for virtually every other subset (users, tags, functions,…):

Subscribe to the feed for:

Hide

News

2011-03-12 - Confoo 2011 presentation
Slides are available from the commandlinefu presentation at Confoo 2011: http://presentations.codeinthehole.com/confoo2011/
2011-01-04 - Moderation now required for new commands
To try and put and end to the spamming, new commands require moderation before they will appear on the site.
2010-12-27 - Apologies for not banning the trolls sooner
Have been away from the interwebs over Christmas. Will be more vigilant henceforth.
2010-09-24 - OAuth and pagination problems fixed
Apologies for the delay in getting Twitter's OAuth supported. Annoying pagination gremlin also fixed.
Hide

Tags

Hide

Functions

Hide

Credits

Site by David Winterbottom (user root).

Commands using perl from sorted by
Terminal - Commands using perl - 330 results
perl -E 'say$_%15?$_%3?$_%5?$_:Buzz:Fizz:Fizzbuzz for 1..100'
2012-11-18 05:47:29
User: MarxBro
Functions: perl
Tags: perl fizzbuzz
3
Up
Down
FizzBuzz in Perl

Just another FizzBuzz in Perl.

Show sample output | Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
perl -e 'print "$_=$ENV{$_}\n" for keys %ENV'
2012-11-12 13:14:28
User: sgikas
Functions: perl
Tags: perl environment
-1
Up
Down
Print environment information.
Show sample output | Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
p=1 ; lynx -source http://www.lipsum.com/feed/xml?amount=${p} | grep '<lipsum>' -A$(((p-1))) | perl -p -i -e 's/\n/\n\n/g' | sed -n '/<lipsum>/,/<\/lipsum>/p' | sed -e 's/<[^>]*>//g'
2012-10-24 14:11:52
User: nublaii
Functions: grep perl sed
0
Up
Down
Get Lorum Ipsum random text from lorumipsum.com

This fixes the extra lines you get when you request only 1 paragraph using a little bit of grep. Just set p to the number of paragraphs you want.

Show sample output | Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
history | perl -pe "~s/ *[0-9]+ *//"
2012-10-23 22:14:00
User: tomrag
Functions: perl
0
Up
Down
display bash history without line numbers
Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
perl -pi -e 's/:([\w\d_]+)(\s*)=>/\1:/g' **/*.rb
2012-10-16 16:54:40
User: asux
Functions: perl
0
Up
Down
Convert Ruby 1.8 to 1.9 hash syntax

Stolen from http://robots.thoughtbot.com/post/17450269990/convert-ruby-1-8-to-1-9-hash-syntax

Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
# strace ... | perl -lne '@F=split(/\\/, $_);for(@F){push @ddd, sprintf("%x", oct("0" . $_))}END{shift @ddd; print pack("H*", join("", @ddd));}'
2012-10-16 14:24:13
User: zwxajh
Functions: perl strace
0
Up
Down
change binary string readable
Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
perl -e 'print map { $_ .= "$ENV{$_}\n" } (keys %ENV)'
2012-10-13 23:38:28
User: MarxBro
Functions: perl
Tags: perl environment
3
Up
Down
Print environment information.

Print environment (system) information using Perl.

Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
perl -e 'print map { -l and $_ .= "\n" } <libxml*>'
2012-10-12 04:50:43
User: MarxBro
Functions: perl
Tags: perl
7
Up
Down
List all symbolic links in current directory that matches regexp

Perl alternative to list symlinks with a clumsy regexp filter: place the regex instead of he example 'libxml' and end it with a wildchar to see the results (previous cd on dir).

Is it possible change the '-l' test for '-d' and it will search for directories. [Same applies for -x and -X. See $(perldoc -f -x) for more tests].

I use it quite often when dealing with shared libraries...

Show sample output | Comments (3) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
perl -MHTML::Entities -ne 'print encode_entities($_)' /tmp/subor.txt
2012-10-11 08:31:14
User: brx75x
Functions: perl
0
Up
Down
encode HTML entities

Encode HTML entities supporting UTF-8 input and output

Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
perl -e '$|++; while (1) { print " " x (rand(35) + 1), int(rand(2)) }'
2012-09-27 22:46:39
User: MarxBro
Functions: perl
Tags: random Matrix
10
Up
Down
Binary digits Matrix effect

Silly Perl variant.

Comments (5) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
cat log | perl -ne 'use POSIX; s/([\d.]+)/strftime "%y-%m-%d %H:%M:%S", localtime $1/e,print if /./'
2012-09-19 06:38:31
User: bs
Functions: cat perl
Tags: time unixtime human-readable timet
0
Up
Down
convert unixtime to human-readable

works where perl works, because the awk version is gnu awk only.

Show sample output | Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
perl -e '$s="$s\xFF" while length($s)<512; print $s while 1' | dd of=/dev/sdX
2012-08-20 05:33:28
User: stonefoz
Functions: dd perl
0
Up
Down
Fill a hard drive with ones - like zero-fill, but the opposite :)
Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
ping g.co|perl -ne'$|=/e=(\S+)/||next;(push@_,$1)>30&&shift@_;print"\r",(map{"\xe2\x96".chr(128+7*$_/(sort{$b<=>$a}@_)[0])." "}@_),"$1ms"'
2012-07-06 22:42:06
User: bartgrantham
Functions: perl ping
Tags: perl ping graph sparkline
0
Up
Down
Text graphing ping output filter

Nasty perl one-liner that provides a sparkline of ping times. If you want a different history than the last 30, just put that value in. It (ab)uses unicode to draw the bars, inspired by https://github.com/joemiller/spark-ping . It's not the most bug-free piece of code, but what it lacks in robustness it makes up for in capability. :)

If anyone has any ideas on how to make it more compact or better, I'd love to hear them.

I included a ping to google in the command just as an example (and burned up 10 chars doing it!). You should use it with: $ ping example.com | $SPARKLINE_PING_COMMAND

Show sample output | Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
perl -e 'printf "00:16:3E:%02X:%02X:%02X\n", rand 0xFF, rand 0xFF, rand 0xFF'
2012-07-02 09:59:43
User: Gular
Functions: perl
Tags: perl oneliner random generate mac address
1
Up
Down
Perl One Liner to Generate a Random IP Address
Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
cat ~/.bash_history | perl -lane 'if($F[0] eq "sudo"){$hash{$F[1]}++}else{$hash{$F[0]}++};$all++;END {@top = map {[$_, $hash{$_}]} sort {$hash{$b}<=>$hash{$a}} keys %hash;printf("%10s%10d%10.2f%%\n", $_->[0],$_->[1],$_->[1]/$all*100) for @top[0..9]}'
2012-07-02 09:38:06
User: vinian
Functions: cat perl sort
0
Up
Down
top ten shell command in bash shell
Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
perl -p -e 's/\\n/\n/g'
2012-06-06 15:37:34
User: icorbett
Functions: perl
0
Up
Down
You can't do that on sed

This also works with -i, just like one might do with sed.

Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
cat /var/log/nginx/access.log | grep -oe '^[0-9.]\+' | perl -ne 'system("geoiplookup $_")' | grep -v found | grep -oe ', [A-Za-z ]\+$' | sort | uniq -c | sort -n
2012-05-08 13:28:25
User: theist
Functions: cat grep perl sort uniq
Tags: sort uniq geoip
-1
Up
Down
Per country GET report, based on access log. Easy to transform to unique IP

Per country GET report, based on access log. Easy to transform to unique IP

Show sample output | Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
find . -printf '%p\n' | perl -ne 'if( m/(.*)\/(.*)/ ) { $p = $1; $f = $2; $p =~ s/[^\/]/ /g; $p =~ s/\//|/g; print "$p/$f\n"; } elsif( m/(.*)/ ) { print "$1\n"; } else { print "error interpreting: \"$_\"\n"; }'
2012-04-24 19:51:00
User: cbetti
Functions: find perl
0
Up
Down
Display directory hierarchy listing as a tree

Provides a much cleaner, easier to read output than the closest alternative, ls -1R. This alternative makes it easier to differentiate directories from files: find . -printf '%y %p\n' | perl -ne 'if( m/(\w) (.*)\/(.*)/ ) { $t = $1; $p = $2; $f = $3; $t =~ s/[^d]/ /; $p =~ s/[^\/]/ /g; $p =~ s/\//|/g; print "$t $p/$f\n"; } elsif( m/(\w) (.*)/ ) { print "$1 $2\n"; } else { print "error interpreting: \"$_\"\n"; }'

Show sample output | Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
ldapsearch -xLLL -b "cn=schema" "(objectclass=*)" \ \* objectclasses attributetypes | perl -p0e 's/\n //g'
2012-04-04 13:31:31
User: ioggstream
Functions: perl
-2
Up
Down
Dump 389ds schema

Dump 389ds schema, putting "\n " on one line with perl.

You have to specify the objectclasses, attributetypes operational attributes too, otherwise they won't be dumped!

Comments (1) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
ldapsearch -xLLL -b "cn=schema" "(objectclass=*)" \ \* objectclasses attributetypes | perl -p0e 's/\n //g'
2012-04-03 16:21:43
User: ioggstream
Functions: perl
-2
Up
Down
Dump 389ds schema

Dump 389ds schema, putting "\n " on one line with perl.

You have to specify the objectclasses, attributetypes operational attributes too, otherwise they won't be dumped!

Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
cat z.log | perl -ne 'BEGIN{ print "DATE;RATE\n"; } /\[(\d.*)\]/ && print $1; /CURRENT RATE: +(\S+) msg.*/ && print ";" .$1 . "\n"; '
2012-04-03 13:52:20
User: hute37
Functions: cat perl
1
Up
Down
multiline data block parse and CSV data extraction with perl

extract data in multiline blocks of data with perl pattern matching loop

Show sample output | Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
ldapsearch -xLLL -b "cn=schema" "(objectclass=*)" \ \* objectclasses attributetypes | perl -p0e 's/\n //g'
2012-04-03 11:25:55
User: ioggstream
Functions: perl
-2
Up
Down
Dump 389ds schema

Dump 389ds schema, putting "\n " on one line with perl.

You have to specify the objectclasses, attributetypes operational attributes too, otherwise they won't be dumped!

Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
ldapsearch -xLLL -b "cn=schema" "(objectclass=*)" \ \* objectclasses attributetypes | perl -p0e 's/\n //g'
2012-04-03 09:56:19
User: ioggstream
Functions: perl
-2
Up
Down
Dump 389ds schema

Dump 389ds schema, putting "\n " on one line with perl.

You have to specify the objectclasses, attributetypes operational attributes too, otherwise they won't be dumped!

Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
ldapsearch -xLLL -b "cn=schema" "(objectclass=*)" \ \* objectclasses attributetypes | perl -p0e 's/\n //g'
2012-04-03 09:44:23
User: ioggstream
Functions: perl
0
Up
Down
Dump 389ds schema

Dump 389ds schema, putting "\n " on one line with perl.

You have to specify the objectclasses, attributetypes operational attributes too, otherwise they won't be dumped!

Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate
ldapsearch -xLLL -b "cn=schema" "(objectclass=*)" \ \* objectclasses attributetypes | perl -p0e 's/\n //g'
2012-04-03 09:44:11
User: ioggstream
Functions: perl
-2
Up
Down
Dump 389ds schema

Dump 389ds schema, putting "\n " on one line with perl.

You have to specify the objectclasses, attributetypes operational attributes too, otherwise they won't be dumped!

Comments (0) | Add to favourites | Report as malicious | Submit alternative | Report as a duplicate