#! /usr/bin/perl

use strict;
use warnings;
use Getopt::Long;

my $param;

GetOptions('-param=s' => \$param);
print $param;