#!/usr/bin/perl -w
###########################################
# isotest.cgi
# Mike Schilli, 2007 (m@perlmeister.com)
###########################################
use strict;
use CGI qw(:all);

print header(
  -type     => 'text/html',
  -charset  => 'iso-8859-1');

print "The Euro sign is ",
      chr(0x80), ".\n";