#!/usr/bin/perl

use strict; 
no warnings; 
use 5.010;
use Data::Dumper;
use CGI;

my %hash = (
    queste => 42,
    faustus => q(Poodle's core),
    oxnard => CGI::param('oxnard'),
    test => 123,

);

say Dumper \%hash;