sub symbol {
    my ($code, $options) = @_;

    $code    ||= 'USD';
    $options ||= 'SYM_UFT';

    eval '$options = ' . $options;

    return currency_symbol($code, $options);
};

##</code><code>##

sub symbol {
    my ($code, $options) = @_;

    $code    ||= 'USD';
    $options ||= 'SYM_UFT';

    eval '$options = ' . $options;

    my $symbol = currency_symbol($code, $options);
    utf8::upgrade($symbol);

    return $symbol;
};