hash = (
        b => ($b =~ /\d/    ? 1  : 0),
        a => ($b =~ /(\d+)/ ? $1 : 0),
);