goto LINE

....blah .... 

LINE: use Module;

##</code><code>##

goto LINE

....blah .... 

LINE: print;
use Module;

##</code><code>##

SWITCH:
{
 if (..cond1..) {... last SWITCH};
 if (..cond2..) {
   ... grab one row fetchrow_hashref ..populate field names..
   do {..code
     last if blah;
      ...code...   
   } while (condX);
 last SWITCH
};
 if (..cond3..) {... last SWITCH};
}

##</code><code>##

SWITCH:
{
 if (..cond1..) {... last SWITCH};
 if (..cond2..) {
... grab one row fetchrow_hashref ..populate field names..
    {
     do 
      {..code
        last if blah;   
      } 
    } while (condX);
  last SWITCH
};
 if (..cond3..) {... last SWITCH};

}