CSS YAML
読了まで:約0分
#!/usr/bin/perl
use strict;
use warnings;
use YAML;
local $/;
print yaml2css(<>);
sub yaml2css {
my $yaml = YAML::Load(shift);
my $css;
foreach my $selector ( keys %{ $yaml } ) {
$css .= sprintf "%s {\n", $selector;
foreach my $property ( keys %{ $yaml->{$selector} } ) {
$css .= sprintf "\t%s: %s;\n", $property, $yaml->{$selector}->{$property};
}
$css .= "}\n";
}
return $css;
}
id:naoya さんの
div#main:
color: #000
background: #FFF
border: 1px #000 solid
のような
perl yaml2css.pl < style.yaml
すると
div#main {
color: #000;
background: #FFF;
border: 1px #000 solid;
}
こんな
YAML で
- CSS JSON → Javascript から
使う とき - CSS YAML → スクリプト(Perl とか
)から 使う とき
かな?
何に
追記: 2006-12-20T15:55:00+09:00
この
id:naoya さん