Select Code to Download

Select or download this

   [template]
      url          = http://www.wired.com/news_drop/palmpilot/
      AvantGo      = No
...
      beamable     = False
      ...          # about 15 other arguments possible here
   [end_template]

Select or download this

   # Thanks for the help here 'demerphq' and 'hiseldl'
   if (defined $beamable && ($beamable =~ /1|true|yes/i)) {   
       $beamable = '--beamable';
...
       $no_url_info_msg = "Unspecified, url information shown";
   }
   print LOG "  url Info:     $no_url_info\n";

Select or download this

   my $systemcmd = "/usr/bin/appname";
   my @systemargs = ('-p', $workpath,
                     '-P', $workpath,
...

   print LOG "Command: $systemcmd @systemargs\n";
   system($systemcmd, @systemargs);

Select or download this

   my @args = 
     ({s_arg  =>'beamable',             # argument name
       t_arg  =>'--beamable',           # true argument
...
       t_msg  =>'Yes, url information provided',
       f_arg  =>'--no-urlinfo',
       f_msg  =>'No, no url information provided'})