#!/usr/bin/perl5 -w

use diagnostics;

# Load Module
use MAP;

# Call Routine
MAP::array("cstrike");
# Print returned array
my $map;
foreach $map (@cstrike)
{
print "$map\n";
}