Add inquire topic example for Perl