The Unicode of a character doesn't make sense to me -- Unicode is a concept, a collection of characters and the name of a consortium, not a property.

There's the number of the codepoint, which you can get from ord. The name of a codepoint can be found with charnames::viacode(ord($character)).

There are a lot of Unicode properties, which can be queried with regexes:

if ($char =~ /\p{Sm}/) {
    print "'$char' is a Math Symbol\n"; 
}
[download]