new font-switcher Perl extension

[Aron Griffis]

Hi Adam,

I needed the following patch to keep whitespace between fonts and
pipes from interfering.

Thanks,
Aron


--- font-switcher.old	2009-01-21 17:02:56.000000000 -0500
+++ font-switcher	2009-01-21 17:03:06.000000000 -0500
@@ -51,7 +51,7 @@
   my ($term) = @_;
   my $font_list = $term->x_resource('font-switcher-list');
   if ($font_list) {
-    @font_list = split /\|\s*/, $font_list;
+    @font_list = split /\s*\|\s*/, $font_list;
   }
 }