Hi monks!
I'm at a loss about why this simple concatenation is not working. I'm pulling a value from a hash and attempting to concatenate ".cal" on the end.

        $Cal_ref = {
            'cal_name'  => $cal_name,
            'dates'     => \@dates,
            'desc'    => $cal_desc
        };

        $twsCalendars[$i] = $Cal_ref;
        $i++;
...

for (my $i = 0; $i < $length; $i++) {
    # cycle through the list and print all the calendar names
    my $c_href = $twsCalendars[$i];
    my $cal_name = $$c_href{'cal_name'};
    my $foo = ".cal";
    my $var1 = $cal_name . "$foo";
    print ("$cal_name\n");
    print ("$var1");
    print "\n";
    print ("    $var1");
    print "\n";
[download]

This outputs the following:

BCPFTPCL
.calTPCL
.calBCPFTPCL
[download]

Whatever I try, I can't concatenate the ".cal" on the end of $cal_name.
thanks,
Dan H.