Select Code to Download

    use utf8;

    sub £_to_¥ { ... }

    my $yen = £_to_¥('1000£');

#!/usr/bin/perl
use strict;
...

my $€ = 1;
say '------------------------';

Unrecognized character \x{20ac}; marked by <-- HERE after my $<-- HERE
+ near
    column 5 at ./uni2.pl line 10 (#1)
...
    
Uncaught exception from user code:
    Unrecognized character \x{20ac}; marked by <-- HERE after my $<-- 
+HERE near column 5 at ./uni2.pl line 10.