3 # $Id: utf8.t,v 1.0.1.2 2000/09/28 21:44:17 ram Exp $
8 # Revision 1.0.1.2 2000/09/28 21:44:17 ram
9 # patch2: fixed stupid typo
11 # Revision 1.0.1.1 2000/09/17 16:48:12 ram
18 print "1..0 # Skip: no utf8 support\n";
24 require Config; import Config;
25 if ($Config{'extensions'} !~ /\bStorable\b/) {
26 print "1..0 # Skip: Storable was not built\n";
29 require 'lib/st-dump.pl';
34 use Storable qw(thaw freeze);
39 ok 1, $x eq ${thaw freeze \$x};