#!/usr/bin/perl

use strict;
use warnings;

use CGI; # Assumption
use CGI::Carp qw( fatalsToBrowser );

# Rest of the code