my $fortune = `fortune`;