#!/usr/bin/perl

use strict ;
use warnings ;

my $output = qx'echo $SHELL' ;

print $output ;

##</code><code>##

      qx/STRING/
      ‘STRING‘
              A string which is (possibly) interpolated and then exe-
              cuted as a system command with "/bin/sh" or its equiva-
              lent.[...]