#!/usr/bin/perl -w
use strict;
use Smart::Comments '###';
use Getopt::Std;

my $o = {};
getopts('d', $o);

### smart comments are on 

unless ($o->{d}) {
	print STDERR 'debug is not on. no smart comments..';
	no Smart::Comments;
}

### i'd like this to output if -d is used