in reply to Zip files while copying

I got it going, thanks everyone
my $cpcmd = (dd if='$sourcedir/$fname' bs=512k|gzip | dd of='$targetdi +r/$fname.gz' bs=512k)