#!/usr/bin/perl -w
use strict;

# mock crontab command for the test suite that only knows '-l'
# see https://bugs.debian.org/838089

my $me = $ENV{USER} || '(none)';

my $opt = shift || '';
if ($opt eq '-l') {
    print STDERR "no crontab for $me\n";
    exit 1;
}

print STDERR "mock command $0 called without -l, exiting\n";
exit 255;
