#!/usr/bin/perl -w

use Test::Harness;

opendir DIR, 't' or die "Can't open dir 't': $!";
@files = grep /.*\.t$/, readdir DIR;
closedir DIR;

chdir 't';
runtests(@files);
chdir '..';

