my $output = `gnuplot $cmd 2>&1`;

##</code><code>##

use IPC::Run qw( run );
my ($stdout, $stderr);
run ["gnuplot", $cmd], undef, \$stdout, \$stderr;

##</code><code>##

------------
:Wq
Not an editor command: Wq