#!/usr/bin/perl

#prompt user for two strings. Remove newline and 
#store into variables
print "\nEnter the first string: ";
chomp($first = <STDIN>);
print "\nEnter the second string: ";
chomp($second = <STDIN>);

sub combine{
print "\nThe combined strings are: " . $_[0] . $_[1] . "\n";
}

&combine($first,$second);