Index: trunk/ippScripts/scripts/ipp_serial_inject.pl
===================================================================
--- trunk/ippScripts/scripts/ipp_serial_inject.pl	(revision 14558)
+++ trunk/ippScripts/scripts/ipp_serial_inject.pl	(revision 14588)
@@ -76,5 +76,5 @@
     # XXX provide an option for an alternative extension
     my ( $vol, $path, $name ) = File::Spec->splitpath( $absfile );
-    my ( $exp_name ) = $name =~ /(.*)\.fits/;
+    my ( $exp_name ) = $name =~ /(.*)\.(fits|fit|fts)(|.gz)/;
 
     my $relfile = $ipprc->convert_filename_relative( $absfile );