print "Enter something: ";
  my $something = <>;