use strict;

use vars qw($foo);
use Pod::Constants -trim => 1, foo => \$foo;

=head1 foo

detcepxe

=cut

1;