One tip that may help you in similar situations in the future. Whenever you find yourself printing a stringified reference when you expected something else, it's helpful to use Data::Dumper;, and to dump the variable in question into Dumper to see what you get. For example, if you added print Dumper \%options; to your script, you would get a good look at the data structure, and that could help you figure out how to find within it the data you're trying to retrieve.

Data::Dumper is a great "I wonder what this structure looks like" tool.