DUMMY Scan

#!/usr/bin/env perl
use Spectra; 

#
# a dummy scan
#
Spectra::scan( device => "dummy", 
               start => 0, 
	       stop => 100, 
	       delta => 20, 
	       comment => "A comment", 
	       scan_name => "test_name", 
	       st => 1) or die  " Failed to execute a DUMMY scan";