my $s = <>;
my $t = <>;
conc ( $s , $t );
sub conc {
my $str = $_[0].$_[1];
print $str;
}Why? It works allright only after add an extra line at the top, that is sub conc; its become just like C -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
