Single Motor Scan

#!/usr/bin/env perl
use Spectra; 
#
# a single motor scan
#
Spectra::scan( device => "mot12", 
	       range => 0.1, 
	       st => 0.2,         # sample time
	       np => 11) or die " Failed to execute a motor scan ";