#!/usr/bin/env perl
exit( $ARGV[0] eq 'is-active' ? 0 : 1 );
