|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Vladimir Ferenz 2:5030/1400.100 19 Jan 2003 07:37:20 To : All Subject : Интерполяция --------------------------------------------------------------------------------
Имеем:
в config.pl:
[...skipped...]
$regesp_filter01 = '/^(\d+\.\d*|\d+)$/';
$regesp_filter02 = '/\S+/';
[...skipped...]
в file.pl
do "config.pl";
[...skipped...]
elsif ("$var =~ $regesp_filter01") {
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Как заставить правильно интерполировать данные в этой конструкции?
$data_type_code = 1;
}
elsif ("$var=~$regesp_filter02") {
$data_type_code = 2;
[...skipped...]
--- ЫЫ Golded+1.1.5 FreeBSD 4.7 crashecho-0.2.14 email:ferenz(@)mail.ru ЫЫ ---
* Origin: Все права на близлежащие диски принадлежат мне. (2:5030/1400.100)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/50953e2a1fe2.html, оценка из 5, голосов 10
|