Clean up tests (and added a simple Perl test)

[suidgw.git] / tests / scripts / quark

#!/usr/bin/perl

use strict;
use warnings;

print "Quark!\n";
sleep 10;
print "Quark quark!\n";