まあ、すぐ分かるんだけど、一応ね。 while read url name; do count=`perl bc.pl $url`; echo -e "$count\t|$name|[${url}:bookmark]|<a href=\"http://b.hatena.ne.jp/entrylist?url=${url}\"><img src=\"http://b.hatena.ne.jp/bc/lg/${url}\"></a>|"; done < input_file | sort -nr -k 1input_fileはこんな感じ。 http://www.bakemonogatari.com…

あると便利かと思ったんだけど、今ひとつスマートな実装が思いつかないんだよなー。 use strict; use warnings; use Encode; use URI::Escape; my $ESCAPED = 1; # normal URI-escaped my $ESCAPED_ALL = 2; # all URI-escaped my $ESCAPED_WP = 4; # URI-es…