package configs;
use Exporter;
use warnings;
use strict;
our @ISA = ("Exporter");
our @EXPORT = qw( %instarray );
our %instarray = (aa =>   "aakeyword",
              bb=>   "bbkeyword",
              cc =>   "cckeyword",
              dd => "ddkeyword",
              ee =>  "eekeyword",
              ff =>  "ffkeyword",
              );

1;

##</code><code>##

#!usr/bin/perl -w
use strict;
use warnings;
use configs;
foreach my $tag (keys %instarray){
         print "$tag - $instarray{$tag} \n";
         }