my $mode = param('mode');

# Main
if (not defined $mode) {
 # ...
}

# After upload
elsif ($mode eq 'secondstage') {
 # ...
}

# Final stage
elsif ($mode eq 'finalstage') {
 # ...
}