Consider the follwing:

#!/usr/bin/perl

# save as out.pl

use strict;
use warnings;

my $output = "out.pl";
system('dir $output');
print "\n\n--------------\n\n";
system("dir $output");
[download]

See Strings in Perl: quoted, interpolated and escaped.

There is no need to call system to chmod a file, see chmod.