use Acme::ButFirst;

  # Print a greeting, but first find caffiene.

  {
          print "Good morning!\n";
  } but first {
          print "I need a coffee\n";
  }