# -*- perl -*- ##---------------------------------------------------------------------------- ## Net/API/Telegram/InlineQuery.pm ## Version 0.1 ## Copyright(c) 2019 Jacques Deguest ## Author: Jacques Deguest <jack@deguest.jp> ## Created 2019/05/29 ## Modified 2020/06/13 ## All rights reserved. ## ## This program is free software; you can redistribute it and/or modify it ## under the same terms as Perl itself. ##---------------------------------------------------------------------------- package Net::API::Telegram::InlineQuery; BEGIN { use strict; use parent qw( Net::API::Telegram::Generic ); our( $VERSION ) = '0.1'; }; sub from { return( shift->_set_get_object( 'from', 'Net::API::Telegram::User', @_ ) ); } sub id { return( shift->_set_get_scalar( 'id', @_ ) ); } sub location { return( shift->_set_get_object( 'location', 'Net::API::Telegram::Location', @_ ) ); } sub offset { return( shift->_set_get_scalar( 'offset', @_ ) ); } sub query { return( shift->_set_get_scalar( 'query', @_ ) ); } 1; __END__ =encoding utf-8 =head1 NAME Net::API::Telegram::InlineQuery - An incoming inline query =head1 SYNOPSIS my $msg = Net::API::Telegram::InlineQuery->new( %data ) || die( Net::API::Telegram::InlineQuery->error, "\n" ); =head1 DESCRIPTION L<Net::API::Telegram::InlineQuery> is a Telegram Message Object as defined here L<https://core.telegram.org/bots/api#inlinequery> This module has been automatically generated from Telegram API documentation by the script scripts/telegram-doc2perl-methods.pl. =head1 METHODS =over 4 =item B<new>( {INIT HASH REF}, %PARAMETERS ) B<new>() will create a new object for the package, pass any argument it might receive to the special standard routine B<init> that I<must> exist. Then it returns what returns B<init>(). The valid parameters are as follow. Methods available here are also parameters to the B<new> method. =over 8 =item * I<verbose> =item * I<debug> =back =item B<from>( L<Net::API::Telegram::User> ) Sender =item B<id>( String ) Unique identifier for this query =item B<location>( L<Net::API::Telegram::Location> ) Optional. Sender location, only for bots that request user location =item B<offset>( String ) Offset of the results to be returned, can be controlled by the bot =item B<query>( String ) Text of the query (up to 512 characters) =back =head1 COPYRIGHT Copyright (c) 2000-2019 DEGUEST Pte. Ltd. =head1 AUTHOR Jacques Deguest E<lt>F<jack@deguest.jp>E<gt> =head1 SEE ALSO L<Net::API::Telegram> =head1 COPYRIGHT & LICENSE Copyright (c) 2018-2019 DEGUEST Pte. Ltd. You can use, copy, modify and redistribute this package and associated files under the same terms as Perl itself. =cut