Encrypt files : Shell « System Functions « Perl

1. Perl
2. System Functions
3. Shell

Encrypt files

      

    $CryptFile = "crypt.out";

    open(OUT,"| crypt > $CryptFile") || die "Can't run crypt\n";

    while(<>) {
        print OUT;
    }
    close(OUT);

   
    
    
    
    
    
  

Related examples in the same category