#!/usr/local/bin/perl -w
use strict ;
+use File::Slurp ;
-use Test::More tests => 2 ;
-
-BEGIN{
- use_ok( 'File::Slurp', qw( read_file write_file append_file ) ) ;
-}
+use Test::More tests => 1 ;
my $data = <<TEXT ;
line 1
is( $data, $read_data ) ;
-
unlink $file ;