How to prepare a pragma statement in Sqlite using Perl?

I tried to prepare a pragma statement:

$sth = $dbh->prepare (q{pragma table_info(?)})

but I get the following error:

DBD::SQLite::db prepare failed: near "?"

What is wrong with the prepare string?