Select Code to Download

use feature qw( say );
use IPC::Run qw( run );
...

run( ['/bin/bash', '-c', qq{echo -n "$path"}, ], q{>}, \$output );
say qq{Output: $output};