1#!/usr/bin/perl
2  (-d "../t") and chdir "..";
3  system( "$^X", "-T", "t/root_spamd_u_dcc.t",
4        "--override", "run_dcc_tests:run_root_tests", "1:1", @ARGV);
5  ($? >> 8 == 0) or die "exec failed";
6
7
8