I think the other posts do a good job of considering backticks and methods to do what you want. But considering what you are actually doing with the code you provided, you could do that using DBI:

@data_sources = DBI->data_sources($driver_name, \%attr);
[download]