...
use strict;
use warnings;
use diagnostics;
...

##</code><code>##

C:SERSSHAUNDOCUMENTS$WEBSITE

##</code><code>##

"C:\\Users\\Shaun\\Documents\\$website"

##</code><code>##

File::Spec->catfile('C:\Users\Shaun\Documents', $website)