1#!/usr/bin/perl 2use strict; 3use warnings; 4use Test::More tests => 6; 5BEGIN { use_ok('preproc') } 6require_ok('preproc'); 7 8# adapted from ../python/preproc_runme.py 9 10is($preproc::endif, 1); 11is($preproc::define, 1); 12is($preproc::defined, 1); 13is($preproc::one * 2, $preproc::two); 14 15