2011/11/16 Nikolay Mishin <[email protected]>: > Hi Moscow-pm, > perl v5.8.4 > Не правда ли получается кривовато, что при > my $EMPTY = undef; > our ( $start_date, $end_date ) = ( $EMPTY, $EMPTY ); > #считываем входные параметры > if ( ( $start_date ne '' ) && ( $end_date ne '' ) ) { > my $RGX_DATE_FULL = qr{.*(\d{2}-\w{3}-\d{4}).*}smo; > } >
вот здесь я не понял а почему не my $EMPTY = ''; ? P.S. >perl v5.8.4 IMHO плохо, очень плохо -- Sergiy Borodych -- Moscow.pm mailing list [email protected] | http://moscow.pm.org
