Вход на сайт
Регулярное выражение
683 просмотров
Перейти к просмотру всей ветки
в ответ Regenwolke 17.05.11 09:54
#!/usr/bin/perl
use strict;
use warnings;
while( <DATA> ) {
print if /^[^_]*_[^_]*$/;
}
__DATA__
Rad05_4564739c-9c63-47c1-9939-71690c2e7ad6.xml
Rad05_2251_4564739c-9c63-47c1-9939-71690c2e7ad6.xml
Dropbox - средство синхронизации и бэкапа файлов.