loginToID.pl

#!/usr/bin/perl

$r = `sed -e "s/\\/\\/\\//aaa/g" tt.tt`;
print $r

 

 

 

[a50236:/data/env/project]# cat > tt.tt
abc
aaa
///
[a50236:/data/env/project]# loginToID.pl
abc
aaa
aaa

Posted by '김용환'

댓글을 달아 주세요