in reply to Re^2: How to include bash functions file in Perl?
in thread How to include bash functions file in Perl?
sub text_to_sh_lit { my ($s) = @_; $s =~ s/'/'\\''/g; return "'$s'"; } my $cmd = ( join ' ', map text_to_sh_lit($_), libHandleFileName => ( -f => $RESULTS, ) ); $renameRes = system( bash => ( "--rcfile" => $sysTestLib, -i, -c => $cmd, ) );
|
|---|