This seems to be an weird error to me although it could be a problem where I am just missing something. Below I have the error and the piece of code it is talking about. Can someone see what I did wrong?



The error is:

Can't modify subtraction (-) in scalar assignment at ./<script name> line 32, near "};"
Execution of ./<script name> aborted due to compilation errors.





The code is :
$f = "PCOUNTER_" . $yr . "_$mo.LOG";
$h = "Print Charges for $mon[$mo], $yr";

print "$h\nFilename: $f\n";

cp $home/smb/testing/DATA/$f /logs-testing-Staff/

********************* area where the error seems to appear **********
$home = $ENV{"HOME"};
unless ($home) {
$home = "/home/print";
}
**************** end area ***************

well that's a bash cp command, not a perl one. try to stick to one language at a time!

use File::Copy cp;
cp("file1","file2");

got it however when I type:

copy("$home/smb/testing/DATA/$f", "$home/logs-testing-Staff/") or die "File cannot be copied.";

I get:

File cannot be copied. at ./<script name> line 27.

I also had to put in "use File::Copy;"

any idea?

well no, i've no idea if that's meant to work or not, i know nothing about your filesystem. if that's *ALL* the code you have then $home hasn't been initialized yet maybe?

The $HOME variable is defined within your shell. You'll either have to use environment variables within your Perl code, define it on the command line, or hard-code it.

Export (or make sure it's set), whatever environment variable you want. Then, your Perl script can use the %ENV hash to read these in. If you've exported FOO="/tmp/test", $ENV{FOO} will have the value "/tmp/test" for your program later on down.