Connectivity to Bteq through Perl

I want to connect to bteq using Perl script and i am unaware of how to do this?
In Shell script it is very simple,
Bteq<<-END
.logon .....
...
.quit ...
END

but what is the syntex for perl?

Please help me out .

Thanks
Kunal

check if this helps

or why don't you search ?