Windows2003-3790/windows/richedit/tom/getset.pl
2020-09-30 16:53:55 +02:00

6 lines
57 B
Perl

while (<>)
{
s/get_/Get/g;
s/put_/Set/g;
print;
}