view release on metacpan or  search on metacpan

t/is_using.pl  view on Meta::CPAN

#!/usr/bin/perl
use warnings;
use strict;

use ARGV::OrDATA;

print ARGV::OrDATA::is_using_argv() ? 1 : 0;
print ARGV::OrDATA::is_using_data() ? 1 : 0;
print "\n";

__DATA__
1