Vim/256色のバックアップ(No.2)

バックアップ一覧
ソースを表示
Vim/256色は削除されています。
- 1 (2008-08-27 (水) 04:36:13)
- 2 (2008-08-27 (水) 04:36:30)

256色

ありがとうございます。便利です。http://cl.pocari.org/2007-06-30-2.html

 #!/usr/bin/env perl
 
 use strict;
 use warnings;
 
 my $fg = "\x1b[38;5;";
 my $bg = "\x1b[48;5;";
 my $rs = "\x1b[0m";
 
 my $color = 0;
 
 for (my $row = 0; $row < 32; ++$row) {
     for (my $col = 0; $col < 8; ++$col) {
         print get_color($color);
         $color++;
     }
     print "\n";
 }
 
 sub get_color {
     my ($color) = @_;
     my $number = sprintf '%3d', $color;
     return qq/${bg}${color}m ${number} ${rs} ${fg}${color}m${number}${rs} /;
 }