in reply to Application Design Issue

You need an easy way to keep score, I have used a system where I

mv step_1_started step_1_done

and mv step_1_done step_2_started ...

unlink step_8_done

Now you can 

if (-e step_1_done)

[download]

Replies are listed 'Best First'.
Re^2: Application Design Issue
by perlCrazy (Monk) on Feb 04, 2008 at 11:49 UTC
    I am creating step1_file that indicates that step1 has been executed successfully.
    If any error comes then that step${n}_file will not be created.
    How this to implement in main script.
    Are you indicating something like, create label and then use GO TO ?
[reply]
      I would read in (with glob) the step_X_done file. Read its number, or 1 into a variable $already_done 

      for my $todo ($already_done .. $final_step){
    do_step1() if $todo == 1;
    do_step2() if (-e step_1_done);

      [download]
      then wrap the code for each step in separate subs.

      Now you can manually delete a "step-file" to have the job start from scratch, or at some spesific step, if you ever need that.

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom