#!/usr/bin/perl -w
use strict;
use Config::IniFiles;

my $conf = Config::IniFiles->new( -file => DATA );

__DATA__

[SECTION]
key              =value

##</code><code>##

Bareword "DATA" not allowed while "strict subs" in use at script.pl line 31.