#!/usr/bin/perl
  
  use strict;
  use warnings;
  
  # file: KeepConfZone.pl
  # brief: Print from stdin lines with conf grater or equal to 0.6
  #
  
  while(<STDIN>)
  {
      #chomp($_);
      my @sctm = split(/ /,$_);
      my $conf = $sctm[5];
  
      if($conf >= 0.6)
      {
          print $_;
      }
      else
      {
         print "# # # # #
  ";
      }
  }