This isn't a code writing service. Did you read any of the responses to Re^3: PERL SCRIPT FOR IPv6 LOOK-UP? See also:

• http://learn.perl.org
• http://perldoc.perl.org
• The Tutorials section of this site.