Select Code to Download

#!/usr/bin/perl

...
  {
  print /$re/ ? "   match" : "no match", " $_\n";
  }

   match PKG_CONFIG_PATH
   match XDG_DATA_DIRS
no match XDG_SEAT_PATH
no match XDG_SESSION_PATH