14:35 >perl 1055_SoPW.pl
Which fruit do you wish to query?
apples
Number of apples is 3

14:35 >perl 1055_SoPW.pl
Which fruit do you wish to query?
guavas
No data for fruit 'guavas'

14:36 >