in reply to Re^2: Variables in extended patterns?
in thread Variables in extended patterns?
ormy $CRE = '0D'; my $LFE = '0A'; s{\x{$CRE}?\x{$LFE}}{\n}xms; s{\015?\012}{\n}xms; s{\x0D\x0A}{\n}xms;
my $CRE = '\x0D'; my $LFE = '\x0A'; $_ = qq,aod \x0D\x0A another \x0D\x0A no more,; s/$CRE?$LFE/--/msxg; print; __END__ aod -- another -- no more
|
|---|