CGI::Untaint::telephone
# use with CGI::Untaint my $untainter = CGI::Untaint->new( $q->Vars ); $untainter->extract(-as_telephone => 'mobile');
A plugin for CGI::Untaint, this attempts to validate input as looking vaguely like a telephone number.
Numbers may optionally start with a +, and may contain dots and dashes, which will be stripped out.
TODO: Ensure that dots and dashes aren't allowed next to each other, and nor should they be the only content in the number.
Toby Corkindale, <cpan@corkindale.net>
Copyright © 2006 by Toby Corkindale
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.7 or, at your option, any later version of Perl 5 you may have available.
