#!/usr/bin/perl -w my $Err; BEGIN{$Err=1 unless $ENV{'SM'}; push @INC,"$ENV{'SM'}/../bin";}; die "Environment string: \$SM not set\n" if $Err; require 'errors.pm';