Perl, TSM Select

[influx]

Hoping someone can help me with following syntax that is NOT working in Perl Script. It breaks when I use "where" and have to use the "tics". Can't figure it out.

$thecmd="select distinct node_name,volume_name,stgpool_name from volumeusage where node_name='nodename'";