# Having defined $HOME, $first, $second up above somewhere...
# Using interpolation
my $dir = "$HOME/$first/$second";

# vs. Using join
my $dir = join '/', ($HOME, $first, $second);