Making use of "use" dynamic ?

[hkn]

Can someone please tell me how I can pass variables when using "use" ?


sub foo {
   my ( $dirname ) = @_;

     use $dirname::Variables;        # Can't get this running. or any other 
combo

# let say if $dirname="Error"  e.g:     Error/Variables.pm

    use Error::Variables;              # this work

     .....
     .....
}

thanks,
-Hakan



_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com