#!/usr/bin/perl use strict; use warnings; use Test::More tests => 6; BEGIN { use_ok('preproc') } require_ok('preproc'); # adapted from ../python/preproc_runme.py is($preproc::endif, 1); is($preproc::define, 1); is($preproc::defined, 1); is($preproc::one * 2, $preproc::two);