my $path = join('', $dir, ($foo || ''), $file);

##</code><code>##

my $path = join('', $dir, (defined $foo ? $foo : ''), $file);