aからzまで表示

Perl

久しぶりにperl

% perl -e 'for("a".."z"){print "$_, ";}'
a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, q, r, s, t, u, v, w, x, y, z, 
% perl -e 'for("00".."10"){print "$_, ";}'
00, 01, 02, 03, 04, 05, 06, 07, 08, 09, 10,

Prelスゲー。

a2z

パスの通った所に置いといてっと。

#!/usr/bin/perl

for ($ARGV[0]..$ARGV[1]) {
    print "$_$ARGV[2]";
}

使う。

% a2z a z
abcdefghijklmnopqrstuvwxyz
% a2z a z ' '
a b c d e f g h i j k l m n o p q r s t u v w x y z 
% a2z a z ', '
a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, q, r, s, t, u, v, w, x, y, z,

引数足りなくても怒られないperlってステキ(笑

Vimから使う。

これがやりたかっただけ。

:r !a2z a z
abcdefghijklmnopqrstuvwxyz

zshで

printfと組み合わせて。

% printf "'%s', " $(a2z a m ' ')
'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm',

printf "'%s', " {a..z}って出来ないんだよね・・・zsh頑張れ!!

あんま触って無いけど、Prelってステキ。