#!/usr/bin/perl -w

eval 'exec /usr/bin/perl -w -S $0 ${1+"$@"}'
    if 0; # not running under some shell
require 5;
use Text::EP3;
my $file = Text::EP3->new;
$file->ep3_execute;
1;
