On Wednesday 18 May 2011 12:25:52 ind...@students.itb.ac.id wrote: > Dear all, > > I try to run this script to process my radar data, the script build by > someone, I have asked him, but his advice can not help. This error message > : ARGV error > firstradar velx vely > > This is the Perl code: > > #! /usr/bin/perl >
No "use strict;" - no "use warnings;" and lots of other offending stuff - this script is horrible. Please don't use it, and instead learn Perl properly from the resources on http://perl-begin.org/ and then re-implement the script the right way. Alterantively, you can hire someone to write your script for you - http://jobs.perl.org/ . Regards, Shlomi Fish > $UNFOLD = 0; #1=UNFOLD^[$B%G!<%?$r;HMQ^[(B > 0=^[$B@8^[(Bvolume^[$B%G!<%?$r;HMQ^[(B #$XDR_NUM = 1; > #1=^[$BJRJ}$N$_^[(BCAPPI^[$B$r:n@.^[(B 0=^[$BN>J}$N^[(BCAPPI^[$B$r:n@.^[(B > > # work directory # > $workdir = "/work/radar_mkCAPPI"; > $datadir = "/work/radar_mkCAPPI/volume"; > $year = "2010"; > > if(@ARGV != 3){ > print "ARGV error \n"; > print "firstradar velx vely \n"; > exit(1); > } > > ### NAME your RADARs ############# > $Rname1 = "bandung"; #radar name > #$Rname2 = "Serpong"; #radar name > > #### Setting option of CAPPI ##### > $firstradar = $ARGV[0]; > $velx = $ARGV[1]; > $vely = $ARGV[2]; > > > ## Save as temporary data? ## > ## yes => 1 or no => 0 ## > ## narita => 0 , ## > ## haneda => 1 , ## > ## cmp =>2 ## > ############################# > > > if($firstradar eq $Rname1){ > $RADARnameF = $Rname1; > # $RADARnameS = $Rname2; > $FX = 0.0; -- ----------------------------------------------------------------- Shlomi Fish http://www.shlomifish.org/ Rethinking CPAN - http://shlom.in/rethinking-cpan Real men don't listen to sentences that start with "Real men don't". -- http://whatsup.org.il/article/6023 Please reply to list if it's a mailing list post - http://shlom.in/reply . -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
