perl -> bash