-BEGIN { $| = 1; print "1..1\n"; }
-END {print "not ok 1\n" unless $loaded;}
-use C4::Context;
-$loaded = 1;
-print "ok 1\n";
+#!/usr/bin/perl
+use strict;
+use warnings;
+use DBI;
+use Test::More tests => 1;
+use Test::MockModule;
+
+BEGIN {
+ use_ok('C4::Context');
+}