perl -wle 'system("echo ab,:cd")' prints: ab,:cd