.vimrcãªã©ã§èªåå°ç¨ã®Vimç°å¢ãä½ã£ã¦ããã¨ãæåè²ãèæ¯è²ã®è²æå®ãctermbgãªã©ã®æ°å¤ã§è¨å®ããéã«ãè²ã¨æ°å¤ã®å¯¾å¿è¡¨ãã»ãããªããã¨ãããããããªã¨ãã«ä½¿ããPerlã¹ã¯ãªãããæ¸ãã¦ã¿ãã #!/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; sub get_color { my ($color) = @_; my $number = sprintf '%3d', $color; return qq/${bg}${color}m ${number}${rs}${fg}${color}m ${number}${rs} /; } for (my $row = 0; $row <
{{#tags}}- {{label}}
{{/tags}}