@args = ("command", "arg1", "arg2");
system(@args) == 0
     or die "system @args failed: $?"

##</code><code>##

$param1 = "some value";
$param2 = "some other value";
open (CRYPT, "crypt -$param1 -$param2 |") or die "error: $!";
while (<CRYPT>) {
    print; #here you can make any manipulation you need with the program output
}
close (CRYPT);