Select Code to Download

    $UTF8{Euro} = pack( 'U', 0x20AC );
    # Equivalent to: $UTF8{Euro} = "\x{20ac}";

    $Unicode{Euro} = unpack( 'U', $UTF8{Euro} );

    #!/usr/bin/perl

    my $v{u} = "hello";
    print($v{u}, "\n");