Added a POD of sorts.

C4/Scan.pm

@@ -26,6 +26,20 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
 # set the version for version checking
 $VERSION = 0.01;
 
+=head1 NAME
+
+C4::Scan - Does nothing
+
+=head1 SYNOPSIS
+
+  use C4::Scan;
+
+=head1 DESCRIPTION
+
+This module doesn't do anything.
+
+=cut
+
 @ISA = qw(Exporter);
 @EXPORT = qw(&getbarcode);
 
@@ -34,5 +48,3 @@ sub Getbarcode {
 }
 
 END { }       # module clean-up code here (global destructor)
-  
-