#!/usr/bin/env perl while (<>) { /^(# )?CONFIG_([^=]+)(=(.+)| is not set)/ and do { my $default = $4; $1 and $default = "n"; my $name = $2; my $type = "bool"; $default =~ /^\"/ and $type = "string"; $default =~ /^\d/ and $type = "int"; print "config BUSYBOX_DEFAULT_$name\n\t$type\n\tdefault $default\n"; }; }