1*cdf0e10cSrcweirbinmode stdin; 2*cdf0e10cSrcweirbinmode stdout; 3*cdf0e10cSrcweirwhile(<>) 4*cdf0e10cSrcweir{ 5*cdf0e10cSrcweir s/t(lxsayshere)/\x0\1/; 6*cdf0e10cSrcweir print $_; 7*cdf0e10cSrcweir} 8