Newbie NMap in FreeBSD Question

[linux quest]

  Lets say, I wanted to create a Perl script to execute a very simple nmap command as listed below, may I know how do I do it?
  
  unix# nmap 192.168.1.2
  
  I know we need to save it in .pl extension. May I know what else I need  to do. I hope someone can share with me the simple coding.
  
  Thanks. 
  
  Regards,
  Linux Quest
  
 
---------------------------------
8:00? 8:25? 8:40?  Find a flick in no time
 with theYahoo! Search movie showtime shortcut.