if ( param('select')) {
    use bytes;
    unless ( grep {$_ eq param('select') } @display_files )
      #If User Selection doesn't match one of the passages then its a Fraud!
   {
      ...