-#!/usr/bin/env perl -w
+#!/usr/bin/env perl
# Copyright (C) 2007-2009 Martin A. Hansen.
# >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
+use warnings;
use strict;
use Maasha::Biopieces qw( get_record put_record );
+use Data::Dumper;
use Maasha::Common;
print STDERR "eval: $options->{ 'eval' }\n" if $options->{ 'verbose' };
-eval "$options->{ 'eval' }";
+eval "no strict; $options->{ 'eval' }";
Maasha::Common::error( qq(Eval of "$options->{ 'eval' }" failed) ) if $@;
+
Maasha::Biopieces::close_stream( $in );
Maasha::Biopieces::close_stream( $out );