$VAR1 = bless( {
                 'numpods' => '4',
                 'success' => 1,
                 'warnings' => bless( {
                                        'count' => 0,
                                        'spellcheck' => []
                                      }, 'Net::WolframAlpha::Warnings' ),
                 'pods' => [
                             bless( {
                                      'infos' => bless( {
                                                          'count' => 0
                                                        }, 'Net::WolframAlpha::Infos' ),
                                      'sounds' => bless( {
                                                           'count' => 0,
                                                           'sound' => []
                                                         }, 'Net::WolframAlpha::Sounds' ),
                                      'states' => bless( {
                                                           'count' => 0,
                                                           'statelist' => [],
                                                           'state' => []
                                                         }, 'Net::WolframAlpha::States' ),
                                      'position' => '100',
                                      'error' => 0,
                                      'subpods' => [
                                                     bless( {
                                                              'plaintext' => 'Perl  (male given name)',
                                                              'img' => '<img width=\'156\' alt=\'Perl  (male given name)\' src=\'http://www4a.wolframalpha.com/Calculate/MSP/MSP1219871b6i0c0785hd000015c94aaf8f80hiic?MSPStoreType=image/gif&s=17\' title=\'Perl  (male given name)\' height=\'20\'/>'
                                                            }, 'Net::WolframAlpha::Subpod' )
                                                   ],
                                      'numsubpods' => '1',
                                      'title' => 'Input interpretation',
                                      'scanner' => 'Identity'
                                    }, 'Net::WolframAlpha::Pod' ),
                             bless( {
                                      'infos' => bless( {
                                                          'count' => 0
                                                        }, 'Net::WolframAlpha::Infos' ),
                                      'sounds' => bless( {
                                                           'count' => 0,
                                                           'sound' => []
                                                         }, 'Net::WolframAlpha::Sounds' ),
                                      'states' => bless( {
                                                           'count' => 0,
                                                           'statelist' => [],
                                                           'state' => []
                                                         }, 'Net::WolframAlpha::States' ),
                                      'position' => '200',
                                      'error' => 0,
                                      'subpods' => [
                                                     bless( {
                                                              'plaintext' => 'rank | beyond 1000th
fraction | less than 1 in 12500 people (0.008%)
number | < 200 people per year 
(US data based on 2008 births and other SSA registrations in the US)',
                                                              'img' => '<img width=\'500\' alt=\'rank | beyond 1000th fraction | less than 1 in 12500 people (0.008%) number | < 200 people per year  (US data based on 2008 births and other SSA registrations in the US)\' src=\'http://www4a.wolframalpha.com/Calculate/MSP/MSP1319871b6i0c0785hd00004314c7g6ad93dgig?MSPStoreType=image/gif&s=17\' title=\'rank | beyond 1000th fraction | less than 1 in 12500 people (0.008%) number | < 200 people per year  (US data based on 2008 births and other SSA registrations in the US)\' height=\'127\'/>'
                                                            }, 'Net::WolframAlpha::Subpod' )
                                                   ],
                                      'numsubpods' => '1',
                                      'title' => 'Information for US births',
                                      'scanner' => 'Data'
                                    }, 'Net::WolframAlpha::Pod' ),
                             bless( {
                                      'infos' => bless( {
                                                          'count' => 0
                                                        }, 'Net::WolframAlpha::Infos' ),
                                      'sounds' => bless( {
                                                           'count' => 0,
                                                           'sound' => []
                                                         }, 'Net::WolframAlpha::Sounds' ),
                                      'states' => bless( {
                                                           'count' => '2',
                                                           'statelist' => [],
                                                           'state' => [
                                                                        bless( {
                                                                                 'name' => 'Log scale'
                                                                               }, 'Net::WolframAlpha::State' ),
                                                                        bless( {
                                                                                 'name' => 'More'
                                                                               }, 'Net::WolframAlpha::State' )
                                                                      ]
                                                         }, 'Net::WolframAlpha::States' ),
                                      'position' => '300',
                                      'error' => 0,
                                      'subpods' => [
                                                     bless( {
                                                              'plaintext' => {},
                                                              'img' => '<img width=\'496\' alt=\'\' src=\'http://www4a.wolframalpha.com/Calculate/MSP/MSP1419871b6i0c0785hd00002905g0fa075bheah?MSPStoreType=image/gif&s=17\' title=\'\' height=\'183\'/>',
                                                              'title' => 'Fraction'
                                                            }, 'Net::WolframAlpha::Subpod' )
                                                   ],
                                      'numsubpods' => '1',
                                      'title' => 'History for US births',
                                      'scanner' => 'Data'
                                    }, 'Net::WolframAlpha::Pod' ),
                             bless( {
                                      'infos' => bless( {
                                                          'count' => 0
                                                        }, 'Net::WolframAlpha::Infos' ),
                                      'sounds' => bless( {
                                                           'count' => 0,
                                                           'sound' => []
                                                         }, 'Net::WolframAlpha::Sounds' ),
                                      'states' => bless( {
                                                           'count' => 0,
                                                           'statelist' => [],
                                                           'state' => []
                                                         }, 'Net::WolframAlpha::States' ),
                                      'position' => '400',
                                      'error' => 0,
                                      'subpods' => [
                                                     bless( {
                                                              'plaintext' => 'expected total number alive today | 0 people
expected population fraction | none
expected rank | 7539th
(using standard US mortality data)',
                                                              'img' => '<img width=\'500\' alt=\'expected total number alive today | 0 people expected population fraction | none expected rank | 7539th (using standard US mortality data)\' src=\'http://www4a.wolframalpha.com/Calculate/MSP/MSP1519871b6i0c0785hd00003g1ed244h1fa49g1?MSPStoreType=image/gif&s=17\' title=\'expected total number alive today | 0 people expected population fraction | none expected rank | 7539th (using standard US mortality data)\' height=\'127\'/>'
                                                            }, 'Net::WolframAlpha::Subpod' )
                                                   ],
                                      'numsubpods' => '1',
                                      'title' => 'Estimates for current US population',
                                      'scanner' => 'Data'
                                    }, 'Net::WolframAlpha::Pod' )
                           ],
                 'didyoumeans' => bless( {
                                           'count' => 0,
                                           'didyoumean' => []
                                         }, 'Net::WolframAlpha::Didyoumeans' ),
                 'parsetiming' => '0.118',
                 'xmlo' => {
                             'pod' => [
                                      {
                                        'subpod' => [
                                                    {
                                                      'plaintext' => 'Perl  (male given name)',
                                                      'img' => {
                                                               'width' => '156',
                                                               'alt' => 'Perl  (male given name)',
                                                               'src' => 'http://www4a.wolframalpha.com/Calculate/MSP/MSP1219871b6i0c0785hd000015c94aaf8f80hiic?MSPStoreType=image/gif&s=17',
                                                               'title' => 'Perl  (male given name)',
                                                               'height' => '20'
                                                             },
                                                      'title' => ''
                                                    }
                                                  ],
                                        'position' => '100',
                                        'error' => 'false',
                                        'title' => 'Input interpretation',
                                        'numsubpods' => '1',
                                        'id' => '{"Input", {"IdentityScanner", "DataScanner"}}',
                                        'scanner' => 'Identity'
                                      },
                                      {
                                        'subpod' => [
                                                    {
                                                      'plaintext' => 'rank | beyond 1000th
fraction | less than 1 in 12500 people (0.008%)
number | < 200 people per year 
(US data based on 2008 births and other SSA registrations in the US)',
                                                      'img' => {
                                                               'width' => '500',
                                                               'alt' => 'rank | beyond 1000th fraction | less than 1 in 12500 people (0.008%) number | < 200 people per year  (US data based on 2008 births and other SSA registrations in the US)',
                                                               'src' => 'http://www4a.wolframalpha.com/Calculate/MSP/MSP1319871b6i0c0785hd00004314c7g6ad93dgig?MSPStoreType=image/gif&s=17',
                                                               'title' => 'rank | beyond 1000th fraction | less than 1 in 12500 people (0.008%) number | < 200 people per year  (US data based on 2008 births and other SSA registrations in the US)',
                                                               'height' => '127'
                                                             },
                                                      'title' => ''
                                                    }
                                                  ],
                                        'position' => '200',
                                        'error' => 'false',
                                        'title' => 'Information for US births',
                                        'numsubpods' => '1',
                                        'id' => '{{"BasicInformation", "GivenNameData"}, {"DataScanner"}}',
                                        'scanner' => 'Data'
                                      },
                                      {
                                        'subpod' => [
                                                    {
                                                      'plaintext' => $VAR1->{'pods'}[2]{'subpods'}[0]{'plaintext'},
                                                      'img' => {
                                                               'width' => '496',
                                                               'alt' => '',
                                                               'src' => 'http://www4a.wolframalpha.com/Calculate/MSP/MSP1419871b6i0c0785hd00002905g0fa075bheah?MSPStoreType=image/gif&s=17',
                                                               'title' => '',
                                                               'height' => '183'
                                                             },
                                                      'title' => 'Fraction'
                                                    }
                                                  ],
                                        'states' => {
                                                    'count' => '2',
                                                    'state' => [
                                                               {
                                                                 'name' => 'Log scale'
                                                               },
                                                               {
                                                                 'name' => 'More'
                                                               }
                                                             ]
                                                  },
                                        'position' => '300',
                                        'scanner' => 'Data',
                                        'error' => 'false',
                                        'id' => '{{"History", "GivenNameData"}, {"DataScanner"}}',
                                        'numsubpods' => '1',
                                        'title' => 'History for US births'
                                      },
                                      {
                                        'subpod' => [
                                                    {
                                                      'plaintext' => 'expected total number alive today | 0 people
expected population fraction | none
expected rank | 7539th
(using standard US mortality data)',
                                                      'img' => {
                                                               'width' => '500',
                                                               'alt' => 'expected total number alive today | 0 people expected population fraction | none expected rank | 7539th (using standard US mortality data)',
                                                               'src' => 'http://www4a.wolframalpha.com/Calculate/MSP/MSP1519871b6i0c0785hd00003g1ed244h1fa49g1?MSPStoreType=image/gif&s=17',
                                                               'title' => 'expected total number alive today | 0 people expected population fraction | none expected rank | 7539th (using standard US mortality data)',
                                                               'height' => '127'
                                                             },
                                                      'title' => ''
                                                    }
                                                  ],
                                        'position' => '400',
                                        'error' => 'false',
                                        'title' => 'Estimates for current US population',
                                        'numsubpods' => '1',
                                        'id' => '{{"CurrentEstimates", "GivenNameData"}, {"DataScanner"}}',
                                        'scanner' => 'Data'
                                      }
                                    ],
                             'success' => 'true',
                             'numpods' => '4',
                             'timedout' => '',
                             'version' => '1.0.0',
                             'parsetiming' => '0.118',
                             'sources' => {
                                          'source' => [
                                                      {
                                                        'text' => 'Given name data',
                                                        'url' => 'http://www.wolframalpha.com/sources/GivenNameDataSourceInformationNotes.html'
                                                      }
                                                    ],
                                          'count' => '1'
                                        },
                             'timing' => '0.841',
                             'error' => 'false',
                             'datatypes' => 'GivenName'
                           },
                 'timing' => '0.841',
                 'sources' => bless( {
                                       'source' => [
                                                     bless( {
                                                              'text' => 'Given name data',
                                                              'url' => 'http://www.wolframalpha.com/sources/GivenNameDataSourceInformationNotes.html'
                                                            }, 'Net::WolframAlpha::Source' )
                                                   ],
                                       'count' => '1'
                                     }, 'Net::WolframAlpha::Sources' ),
                 'xml' => '<?xml version=\'1.0\' encoding=\'UTF-8\'?>
<queryresult success=\'true\'
    error=\'false\'
    numpods=\'4\'
    datatypes=\'GivenName\'
    timedout=\'\'
    timing=\'0.841\'
    parsetiming=\'0.118\'
    version=\'1.0.0\'>
 <pod title=\'Input interpretation\'
     scanner=\'Identity\'
     id=\'{&quot;Input&quot;, {&quot;IdentityScanner&quot;, &quot;DataScanner&quot;}}\'
     position=\'100\'
     error=\'false\'
     numsubpods=\'1\'>
  <subpod title=\'\'>
   <plaintext>Perl  (male given name)</plaintext>
   <img src=\'http://www4a.wolframalpha.com/Calculate/MSP/MSP1219871b6i0c0785hd000015c94aaf8f80hiic?MSPStoreType=image/gif&amp;s=17\'
       alt=\'Perl  (male given name)\'
       title=\'Perl  (male given name)\'
       width=\'156\'
       height=\'20\' />
  </subpod>
 </pod>
 <pod title=\'Information for US births\'
     scanner=\'Data\'
     id=\'{{&quot;BasicInformation&quot;, &quot;GivenNameData&quot;}, {&quot;DataScanner&quot;}}\'
     position=\'200\'
     error=\'false\'
     numsubpods=\'1\'>
  <subpod title=\'\'>
   <plaintext>rank | beyond 1000th
fraction | less than 1 in 12500 people (0.008%)
number | &lt; 200 people per year 
(US data based on 2008 births and other SSA registrations in the US)</plaintext>
   <img src=\'http://www4a.wolframalpha.com/Calculate/MSP/MSP1319871b6i0c0785hd00004314c7g6ad93dgig?MSPStoreType=image/gif&amp;s=17\'
       alt=\'rank | beyond 1000th
fraction | less than 1 in 12500 people (0.008%)
number | &lt; 200 people per year 
(US data based on 2008 births and other SSA registrations in the US)\'
       title=\'rank | beyond 1000th
fraction | less than 1 in 12500 people (0.008%)
number | &lt; 200 people per year 
(US data based on 2008 births and other SSA registrations in the US)\'
       width=\'500\'
       height=\'127\' />
  </subpod>
 </pod>
 <pod title=\'History for US births\'
     scanner=\'Data\'
     id=\'{{&quot;History&quot;, &quot;GivenNameData&quot;}, {&quot;DataScanner&quot;}}\'
     position=\'300\'
     error=\'false\'
     numsubpods=\'1\'>
  <subpod title=\'Fraction\'>
   <plaintext></plaintext>
   <img src=\'http://www4a.wolframalpha.com/Calculate/MSP/MSP1419871b6i0c0785hd00002905g0fa075bheah?MSPStoreType=image/gif&amp;s=17\'
       alt=\'\'
       title=\'\'
       width=\'496\'
       height=\'183\' />
  </subpod>
  <states count=\'2\'>
   <state name=\'Log scale\' />
   <state name=\'More\' />
  </states>
 </pod>
 <pod title=\'Estimates for current US population\'
     scanner=\'Data\'
     id=\'{{&quot;CurrentEstimates&quot;, &quot;GivenNameData&quot;}, {&quot;DataScanner&quot;}}\'
     position=\'400\'
     error=\'false\'
     numsubpods=\'1\'>
  <subpod title=\'\'>
   <plaintext>expected total number alive today | 0 people
expected population fraction | none
expected rank | 7539th
(using standard US mortality data)</plaintext>
   <img src=\'http://www4a.wolframalpha.com/Calculate/MSP/MSP1519871b6i0c0785hd00003g1ed244h1fa49g1?MSPStoreType=image/gif&amp;s=17\'
       alt=\'expected total number alive today | 0 people
expected population fraction | none
expected rank | 7539th
(using standard US mortality data)\'
       title=\'expected total number alive today | 0 people
expected population fraction | none
expected rank | 7539th
(using standard US mortality data)\'
       width=\'500\'
       height=\'127\' />
  </subpod>
 </pod>
 <sources count=\'1\'>
  <source url=\'http://www.wolframalpha.com/sources/GivenNameDataSourceInformationNotes.html\'
      text=\'Given name data\' />
 </sources>
</queryresult>',
                 'error' => 0,
                 'datatypes' => 'GivenName',
                 'assumptions' => bless( {
                                           'count' => 0
                                         }, 'Net::WolframAlpha::Assumptions' )
               }, 'Net::WolframAlpha::Query' );