#!/bin/sh
exec perl -e '

use strict; use warnings;

require "brace_parser.pl";

our @lines;

use Brace::B2b0;
use Brace::B02bh;

read_lines(\*STDIN);

b2b0();
b02bh();

output_all();
' "$@"