User
perl -pe 's/(.*)/bla-bla-$1/'
perl -pe "s/(.*)/bla-bla-\$1/"
#!/usr/bin/perl #!/usr/bin/perl Xывафfdasdfasfd asdfasfda sfasdfasfd asfdasdfa sdfasdfasfd
type abc.txt | perl -pe "print $_;last"
perl -MFile::Find -MCwd -le "$path = getcwd;finddepth(sub {print $File::Find::name if %1}, $path)"
Из перлдок
«Deletes the directory specified by FILENAME if that directory is empty»
Можете мне понизить.
А во-вторых, не всем нравится Javascript.
Если Вы делаете под Линукс, то либо используйте одинарные кавычки для кода, либо двойные, но тогда придётся экранировать доллары:
perl -pe 's/(.*)/bla-bla-$1/'или
perl -pe "s/(.*)/bla-bla-\$1/"Если Вы делаете под Линукс, то либо используйте одинарные кавычки для кода, либо двойные, но тогда придётся экранировать доллары:
perl -pe 's/(.*)/bla-bla-$1/'или
perl -pe "s/(.*)/bla-bla-\$1/"А зачем всё решать именно перлом?
Файл abc.txt такого содержания.
#!/usr/bin/perl
#!/usr/bin/perl
Xывафfdasdfasfd
asdfasfda
sfasdfasfd
asfdasdfa
sdfasdfasfd
потом запустил
type abc.txt | perl -pe "print $_;last"Мне вывело только "#!/usr/bin/perl". Так что Вы уверены, насчёт Вашего высказывания?
rs.bat (rs — regexp search)
perl -MFile::Find -MCwd -le "$path = getcwd;finddepth(sub {print $File::Find::name if %1}, $path)"Прописал в системные переменные путь к ней.
теперь вызываю её так:
rs /<регулярное выражение>/<флаги>
пример: rs /\.pl$/