my $SourceDir = 'File::Spec'->catpath($volume, qw(Users st2641 Desktop
+ Source_dir));
[download]

When seeing barewords separated by whitespace, Perl thinks "indirect object notation".

Add 'use strict' and 'use warnings'. You'll see you're treating 'Users' 'st2641' and 'Desktop' as bareword values, which means Perl doesn't really know, whether they're variables, procedure calls or strings.

I would assume you're aiming to get e.g. "C:\Users\st2641\Desktop\Source_dir". If that's so, you need instead to do:

use strict;
use warnings;

my $volume = "C:";
use File::Spec::Win32;
my $SourceDir      = File::Spec::Win32::catfile( $volume, qw ( Users s
+t2641 Desktop Source_dir  ) ); 

print $SourceDir,"\n";
[download]

Is that more or less what you were after?

Its simple, you skipped reading perlintro and you didn't turn on diagnostics and you're not quoting the stuff you want to be quoting

Turn on diagnostics and read the more verbose error message you get, and report back

Also, obligatory, the checklists :) Basic debugging checklist , brian's Guide to Solving Any Perl Problem, CGI Help Guide , Troubleshooting Perl CGI scripts

You are correct about me forgetting to use 'qw', and not reading perlintro - which I will. I did use diagnostics, which I omitted in my post (my fault). So, the error I provided is verbose. I do realize I need to do a lot of reading to get where I need to be. I appreciate your help and direction.