#!/usr/bin/perl
use strict;
use warnings;
# scalar variables
my $defaultindent="\t";
my $line='';
my $delimeters=0;
# array variables
my @indent=();
my @lines=();
my @block=();
# hash lookup variables
#
# if you don't want to indent an environment
# put it in this hash table
my %noindent=("pccexample"=>1,
"pccdefinition"=>1,
"problem"=>1,
"exercises"=>1,
"pccsolution"=>1,
"widepage"=>1,
"document"=>1,
);
# if we have rules for particular environments
my %indentrules=("axis"=>" ");
# environments that have tab delimeters