#!/usr/bin/perl

$il = 0;

while (<STDIN>) {
	if (/^#else/)	{ $il--; }
	if (/^#endif/) { $il--; }
	print "  " x$il;
	print;
	if (/^#else/) { $il++; }
	if (/^#if/) { $il++; }
}
