my $gsm = new Device::Gsm( port => $variable ....

##</code><code>##

my $gsm = new Device::Gsm( port => "stuff/plus/$interoplation"...