view _test/temp.pl @ 129:e4f15cbc3f1a

Fixed utf-8 problem
author wizard
date Tue, 15 Jun 2010 20:12:58 +0400
parents a4b0a819bbda
children 44977efed303
line wrap: on
line source

#!/usr/bin/perl
use strict;

my $var ;
$var->{dool} = '';
print $var;