|
Posted by jchen750021 on March 15, 2007, 10:40 pm
Please log in for more thread options
chunj...@gmail.com wrote in news:1172009738.829363.189370
@v45g2000cwv.googlegroups.com:
> I have a list of sql files, in which it ends with a "/". Now I want to
> replace it with "//end" for all files. And here is my perl command,
> "
> perl -pi.org -e 's/^\/$/^\/\/end$/' *.SQL
> "
> Suprisingly it does not work.
It does not work is a bad description. Please read the posting
guidelines for this group.
#!/usr/bin/perl
use strict;
use warnings;
while ( <DATA> ) {
s and print;
}
__DATA__
/
/
| 
XML Sitemap