OK, here's the script using Test::Simple, and using using eval as corion suggested. However, it still fails on compilation, complaining that $csv2 needs an explicit package name, on the last line, set_filename. If I comment this line out, it works.

Is there any way I can create a test script that will run the first three tests and fail out on the final test?

And why is this final test failing, anyway?

use warnings;
use strict;
use Text::xSV; #documentation in http://search.cpan.org/~tilly/Text-xS
+V-0.14/lib/Text/xSV.pm
use Test::Simple tests => 4;

#filename set in new().  works.
my $csv1 = Text::xSV->new(
filename => "filename.txt",
header   => ["partner",
            "kampagne",
            "keywordCluster",
            "keyword",
            "clicks",
            "leads",
            "orders",
            "jaronVerguetung",
            "partnerVerguetung",
            "profit"],
);
ok( ( defined($csv1) ) , 'Csv object created using filename => "filena
+me.txt"');
ok( $csv1->set_sep(';')  , "Separator set for this object." );

#filename set in set_filename.  Doesn't work.
#error is "global symbol... requires explicit package name.  Fails on 
+set_filename.  But not on set_sep.  Weird.
my $csv2 = Text::xSV->new();

ok( ( defined($csv2) ) , 'Csv object created with new, without using f
+ilename => "filename.txt"');
ok( ( eval { $csv2->set_filename("popularixCombined.csv") } ) ,"Filena
+me set for this object.");
[download]

UPDATE: Corrected the variable name. All four tests now run. Oops.