#!/usr/bin/perl -w
 ;#
 ;#
use strict;

my $string = 'semi-colon';
print $string,"\n";