http://www.perlmonks.org?node_id=549205


in reply to Small examples of string eval

An example you use every day an never know about it. The dynamic loading of DBD drivers from the DBI source code. 
    # --- load the code
    my $driver_class = "DBD::$driver";
    eval qq{package                     # hide from PAUSE
                DBI::_firesafe;         # just in case
            require $driver_class;      # load the driver
    };

[download]
UnderMine

In Section Seekers of Perl Wisdom