Commands by bashrc (17)
-
compgen -c finds everything in your path. Show Sample Output
8whatis $(compgen -c) 2>/dev/null | less -
from my bashrc ;)
1find . -mount -type f -printf "%k %p\n" | sort -rg | cut -d \ -f 2- | xargs -I {} du -sh {} | less -
Cleaner with a mailto assignment in crontab (if the command fails you get an email): MAILTO=admin@example.com 10,30,50 * * * * ping -q -c1 -w3 192.168.0.14 >/dev/null
210,30,50 * * * * ping -c1 -w3 192.168.0.14 >/dev/null -
2perl -i -ne 'print if $. == 3..5' <filename>
-
If you want to know which values from a list are used within a file. Here's the bash function - called goo - for lack of a better name ;) function goo() { perl -e 'while (my $l = <STDIN>) { foreach (sort { length($b) <=> length($a) } @ARGV) { print "$_\n" x $l =~ s/$_//ig; } }' "$@" } Show Sample Output
0goo some things you search for < file -
Perl version - just for completeness sake ;)
-1perl -ne '$. == 4 && print && exit' -
This version now adds a header with consecutive numbering. Show Sample Output
0cat file.csv | perl -pe 'if($. == 1) {@h = split(/;/); $i = 1 ; map { $_ = $i; $i++ } @h; print join(" ;", @h) , "\n"} ; s/(^|;);/$1 ;/g' | column -ts\; | less -S -
-n switch keeps empty columns If your distribution does not ship with a recent column version that supports -n you can use this alternative: perl -pe 's/(^|;);/$1 ;/g' file.csv | column -ts\; | less -S Change the delimiter to your liking.
23column -tns: /etc/passwd -
I use this in my bashrc to expand hosts defined in ~/.ssh/config: function _ssh_completion() { perl -ne 'print "$1 " if /^Host (.+)$/' ~/.ssh/config } complete -W "$(_ssh_completion)" ssh Here's a great article on how to setup your own ~/.ssh/config: http://blogs.perl.org/users/smylers/2011/08/ssh-productivity-tips.html
6perl -ne 'print "$1 " if /^Host (.+)$/' ~/.ssh/config -
Can also just use the debug mode like this. Show Sample Output
1perl -dwe 1 -
1mysql --pager="less -niSFX"
-
Even faster without the need for cut... :)
29echo ${SSH_CLIENT%% *} -
Part of coreutils - so needs no extra package... Show Sample Output
6readlink -e /bin/ls -
2mytop
-
Clone directory structure without the files
1cd $srcdir && find -type d -exec mkdir -p $dstdir/{} \; -
A bit shorter ;)
3ls -F | grep '*$' -
Not really better - just different ;) There's probably a really simple solution out there somewhere... Show Sample Output
1netstat -atn | perl -0777 -ne '@ports = /tcp.*?\:(\d+)\s+/imsg ; for $port (32768..61000) {if(!grep(/^$port$/, @ports)) { print $port; last } }'
What's this?
commandlinefu.com is the place to record those command-line gems that you return to again and again. 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.
Check These Out
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:
- » all commands
- » commands with 3 up-votes (commandlinefu3)
- » commands with 10 up-votes (commandlinefu10)
- » commands by bashrc