use Mail::Client::Yahoo;

my $y = Mail::Client::Yahoo->login(
    username => 'vasanthgk91@yahoo.com',
    password => 'password',
    secure   => 0
  );

my $Inbox=$y->select_folder('inbox');

print "$Inbox";