my $num_views = -1;
my $val = "23,452,789 views";

if ($val =~ /([\d]*),([\d]*),([\d]*) views/)
{
          $num_views = ($1 * 1000000) + ($2 * 1000) + $3;
          print "# Matched number of views [$num_views].\n";        
}        
  else        
  {             
    if ($val =~ /([\d]*),([\d]*) views/)           
    {              
      $num_views = ($1 * 1000) + $2;
      print "# Matched number of views [$num_views].\n";  
    }
    else            
    {               
      if ($val =~ /([\d]*) views/)              
      {                 
        $num_views = $1;
        print "# Matched number of views [$num_views].\n";
      }
      else
      {
        print "# Error.\n";               
      }
   }         
}