| FormValidator-LazyWay documentation | Contained in the FormValidator-LazyWay distribution. |
FormValidator::LazyWay::Filter::Unify - 複数の文字を統一する filter
ハイフンっぽい文字を - に統一する
| FormValidator-LazyWay documentation | Contained in the FormValidator-LazyWay distribution. |
package FormValidator::LazyWay::Filter::Unify; use strict; use warnings; use utf8; sub hyphen { my $text = shift; $text =~ s/[\x{30FC}\x{2015}\x{2500}\x{2501}\x{02D7}\x{2010}-\x{2012}\x{FE63}\x{FF0D}]/-/xmsg; $text; } 1;