HOME


Mini Shell 1.0
DIR: /usr/lib/python3/dist-packages/pygments/lexers/__pycache__/
Upload File :
Current File : //usr/lib/python3/dist-packages/pygments/lexers/__pycache__/perl.cpython-312.pyc
�

|�e����dZddlZddlmZmZmZmZmZmZm	Z	m
Z
ddlmZm
Z
mZmZmZmZmZmZmZddlmZddgZGd�de�ZGd	�de�Zy)
z�
    pygments.lexers.perl
    ~~~~~~~~~~~~~~~~~~~~

    Lexers for Perl, Raku and related languages.

    :copyright: Copyright 2006-2023 by the Pygments team, see AUTHORS.
    :license: BSD, see LICENSE for details.
�N)�
RegexLexer�ExtendedRegexLexer�include�bygroups�using�this�default�words)	�Text�Comment�Operator�Keyword�Name�String�Number�Punctuation�
Whitespace)�shebang_matches�	PerlLexer�
Perl6Lexerc�p
�eZdZdZdZdZddgZgd�ZddgZe	je	jzZd	e
jd
fde
jd
fde
jd
fd
e
jd
fde
jd
fde
jd
fde
jd
fde
jd
fde
jd
fde
jd
fg
gdej f�dej"f�dej$f�edd��ef�deeeeeee�df�dej4f�de
jf�de
jf�de
jf�d e
jf�d!e
jf�d"e
jd#f�d$e
jd#f�d%e
jd#f�d&e
jd#f�d'e
jf�d(e
jd#f�d)e
jf�d*ef�ed+d��ej6f�d,ej6j8f�d-ee
e
e
j:e
e
j:e�f�d.ej<d/f�d0ej>j@f�d1ej>j@f�d2ej>d3f�d4e!jDf�d5e!jFf�d6e!jHf�d7e!jJf�d8e!jJf�d9e!jLf�d:e
f�d;e
f�d<e
jNf�d=e
jf�d>e
jPd?f�d@e
jPdAf�dBe
jPdCf�dDe
jPdEf�dFe
jPf�dGeeeejR�f�dHeeeejR�f�dIeee�dJf�edKd��ef�dLef�dMef�dNef�dOedPf�dQe
jTd
fdRe
jTfgd*efdSed
fdTed
fdUejRfdVej>d
fgdWejRd
fdXejRd
fdVed
fdYejVd
fdZe,d
fgd[ejZfd*efd\eee�fd]ed
fd^ed
fgd_e
jPfd`e
jPfdSe
jPd?fdae
jPd
fdbe
jPfgdce
jPfd`e
jPfdde
jPdAfdee
jPd
fdfe
jPfgdge
jPfd`e
jPfdhe
jPdCfdie
jPd
fdje
jPfgdke
jPfd`e
jPfdle
jPdEfdme
jPd
fdne
jPfgdoej<d
fgdp�Z.dq�Z/yr)srz
    For Perl source code.
    �Perlzhttps://www.perl.org�perl�pl)�*.pl�*.pm�*.tz*.perlztext/x-perlzapplication/x-perlz"/(\\\\|\\[^\\]|[^\\/])*/[egimosx]*�#popz"!(\\\\|\\[^\\]|[^\\!])*![egimosx]*z\\(\\\\|[^\\])*\\[egimosx]*z$\{(\\\\|\\[^\\]|[^\\}])*\}[egimosx]*z"<(\\\\|\\[^\\]|[^\\>])*>[egimosx]*z%\[(\\\\|\\[^\\]|[^\\\]])*\][egimosx]*z$\((\\\\|\\[^\\]|[^\\)])*\)[egimosx]*z"@(\\\\|\\[^\\]|[^\\@])*@[egimosx]*z"%(\\\\|\\[^\\]|[^\\%])*%[egimosx]*z$\$(\\\\|\\[^\\]|[^\\$])*\$[egimosx]*z	\A\#!.+?$z\#.*?$z^=[a-zA-Z0-9]+\s+.*?\n=cut)�case�continue�do�else�elsif�for�foreach�if�last�my�next�our�redo�reset�then�unless�until�while�print�new�BEGIN�CHECK�INIT�END�returnz\b��suffixz!(format)(\s+)(\w+)(\s*)(=)(\s*\n)�formatz$(eq|lt|gt|le|ge|ne|not|and|or|cmp)\bz:s/(\\\\|\\[^\\]|[^\\/])*/(\\\\|\\[^\\]|[^\\/])*/[egimosx]*z.s!(\\\\|\\!|[^!])*!(\\\\|\\!|[^!])*![egimosx]*z+s\\(\\\\|[^\\])*\\(\\\\|[^\\])*\\[egimosx]*z:s@(\\\\|\\[^\\]|[^\\@])*@(\\\\|\\[^\\]|[^\\@])*@[egimosx]*z:s%(\\\\|\\[^\\]|[^\\%])*%(\\\\|\\[^\\]|[^\\%])*%[egimosx]*zs\{(\\\\|\\[^\\]|[^\\}])*\}\s*�balanced-regexzs<(\\\\|\\[^\\]|[^\\>])*>\s*zs\[(\\\\|\\[^\\]|[^\\\]])*\]\s*zs\((\\\\|\\[^\\]|[^\\)])*\)\s*z&m?/(\\\\|\\[^\\]|[^\\/\n])*/[gcimosx]*zm(?=[/!\\{<\[(@%$])z6((?<==~)|(?<=\())\s*/(\\\\|\\[^\\]|[^\\/])*/[gcimosx]*z\s+)��abs�accept�alarm�atan2�bind�binmode�bless�caller�chdir�chmod�chomp�chop�chown�chr�chroot�close�closedir�connectr �cos�crypt�dbmclose�dbmopen�defined�delete�die�dump�each�endgrent�
endhostent�	endnetent�endprotoent�endpwent�
endservent�eof�eval�exec�exists�exit�exp�fcntl�fileno�flock�forkr:�formline�getc�getgrent�getgrgid�getgrnam�
gethostbyaddr�
gethostbyname�
gethostent�getlogin�getnetbyaddr�getnetbyname�	getnetent�getpeername�getpgrp�getppid�getpriority�getprotobyname�getprotobynumber�getprotoent�getpwent�getpwnam�getpwuid�
getservbyname�
getservbyport�
getservent�getsockname�
getsockopt�glob�gmtime�goto�grep�hex�import�index�int�ioctl�join�keys�killr'�lc�lcfirst�length�link�listen�local�	localtime�log�lstat�map�mkdir�msgctl�msgget�msgrcv�msgsndr(r)�oct�open�opendir�ordr*�pack�pipe�pop�pos�printf�	prototype�push�	quotemeta�rand�read�readdir�readline�readlink�readpipe�recvr+�ref�rename�reverse�	rewinddir�rindex�rmdir�scalar�seek�seekdir�select�semctl�semget�semop�send�setgrent�
sethostent�	setnetent�setpgrp�setpriority�setprotoent�setpwent�
setservent�
setsockopt�shift�shmctl�shmget�shmread�shmwrite�shutdown�sin�sleep�socket�
socketpair�sort�splice�split�sprintf�sqrt�srand�stat�study�substr�symlink�syscall�sysopen�sysread�sysseek�system�syswrite�tell�telldir�tie�tied�time�times�tr�truncate�uc�ucfirst�umask�undef�unlink�unpack�unshift�untie�utime�values�vec�wait�waitpid�	wantarray�warn�writez+((__(DATA|DIE|WARN)__)|(STD(IN|OUT|ERR)))\bz/(<<)([\'"]?)([a-zA-Z_]\w*)(\2;?\n.*?\n)(\3)(\n)�__END__�end-partz\$\^[ADEFHILMOPSTWX]z(\$[\\\"\[\]'&`+*.,;=%~?@$!<>(^|/-](?!\w)z[$@%#]+�varname�0_?[0-7]+(_[0-7]+)*�0x[0-9A-Fa-f]+(_[0-9A-Fa-f]+)*�0b[01]+(_[01]+)*�?(?i)(\d*(_\d*)*\.\d+(_\d*)*|\d+(_\d*)*\.\d+(_\d*)*)(e[+-]?\d+)?�(?i)\d+(_\d*)*e[+-]?\d+(_\d*)*�
\d+(_\d+)*�'(\\\\|\\[^\\]|[^'\\])*'�"(\\\\|\\[^\\]|[^"\\])*"z`(\\\\|\\[^\\]|[^`\\])*`z<([^\s>]+)>z(q|qq|qw|qr|qx)\{�	cb-stringz(q|qq|qw|qr|qx)\(�	rb-stringz(q|qq|qw|qr|qx)\[�	sb-stringz(q|qq|qw|qr|qx)\<�	lt-stringz (q|qq|qw|qr|qx)([\W_])(.|\n)*?\2z/(package)(\s+)([a-zA-Z_]\w*(?:::[a-zA-Z_]\w*)*)z6(use|require|no)(\s+)([a-zA-Z_]\w*(?:::[a-zA-Z_]\w*)*)z
(sub)(\s+)�funcname)�no�package�require�usez=(\[\]|\*\*|::|<<|>>|>=|<=>|<=|={3}|!=|=~|!~|&&?|\|\||\.{1,3})z[-+/*%=<>&^|!\\~]=?z[()\[\]:;,<>/?{}]z(?=\w)�namez\.\nz[^\n]*\n�\{z\)|,z\w+::z[\w:]+z+[a-zA-Z_]\w*(::[a-zA-Z_]\w*)*(::)?(?=\s*->)z[a-zA-Z_]\w*(::[a-zA-Z_]\w*)*::z
[A-Z_]+(?=\W)z(?=\W)z[a-zA-Z_]\w*[!?]?z(\([$@%]*\))(\s*)�;z.*?\{z\\[{}\\]z\\�\}z[^{}\\]+z\\[()\\]z\(z\)z[^()]+z
\\[\[\]\\]z\[z\]z[^\[\]]+z\\[<>\\]z\<z\>z[^<>]+z.+)r;�rootr:r�r
rrrrrr�c�l�t|d�ryd}tjd|�r|dz
}d|vr|dz}|S)NrTrz(?:my|our)\s+[$@%(]g�������?�:=�)r�re�search)�text�results  �6/usr/lib/python3/dist-packages/pygments/lexers/perl.py�analyse_textzPerlLexer.analyse_text�sC���4��)����
�9�9�+�T�2��c�M�F��4�<�
�a�K�F��
�N)0�__name__�
__module__�__qualname__�__doc__r
�url�aliases�	filenames�	mimetypesr�DOTALL�	MULTILINE�flagsr�Regexr�Hashbang�Single�	Multiliner
rrrrrr
�Word�Builtin�Pseudo�	Delimiter�Preproc�Variable�Globalr�Oct�Hex�Bin�Float�Integer�Backtick�Other�	Namespace�Interpol�Constantr�Function�tokensr�rrrrs�����D�
 �C��t�n�G�1�I�� 4�5�I��I�I����$�E�3�F�L�L�&�I�
2�F�L�L�&�I�
+�V�\�\�6�B�
4�f�l�l�F�K�
2�F�L�L�&�I�
5�v�|�|�V�L�
4�f�l�l�F�K�
2�F�L�L�&�I�
2�F�L�L�&�I�
4�f�l�l�F�K�
�d
�
�7�+�+�,�d
�
����'�d
�+�G�,=�,=�>�d
��2�;@�	A�
�
�	d
�2�
�g�z�4��[�*�
U�W_�
a�d
�5�h�m�m�D�d
�K����
�d
� ?����M�!d
�"<�V�\�\�J�#d
�$K����
�%d
�(K����
�)d
�./����>N�O�/d
�0-�f�l�l�<L�M�1d
�20���� �
"�3d
�6/���� �
"�7d
�<7����E�=d
�>$�V�\�\�3C�D�?d
�@G����
�Ad
�D�Z� �Ed
�F�[�4di�5j�6�\�\�7
�Gd
�~<�T�\�\�=P�=P�Q�d
�@@�
�f�f�f�&6�&6���@P�@P�R\�
]�
_�Ad
�D����*�5�Ed
�F%�d�m�m�&:�&:�;�Gd
�H9�$�-�-�:N�:N�O�Id
�J����	�2�Kd
�L$�V�Z�Z�0�Md
�N/��
�
�;�Od
�P!�&�*�*�-�Qd
�RP�
�\�\�
�Sd
�V/����=�Wd
�X�F�N�N�+�Yd
�Z)�&�1�[d
�\)�&�1�]d
�^)�&�/�/�:�_d
�`�V�\�\�*�ad
�b"�6�<�<��=�cd
�d"�6�<�<��=�ed
�f"�6�<�<��=�gd
�h"�6�<�<��=�id
�j1�&�,�,�?�kd
�l@�
�g�z�4�>�>�
:�
<�md
�pG�
�g�z�4�>�>�
:�
<�qd
�t�H�W�j�9�:�F�ud
�v�3�;@�B�
�
�wd
�|%�&.�
0�}d
�@$�X�.�Ad
�B"�;�/�Cd
�F��f�%�Gd
�L�f�o�o�v�.�
�&�/�/�*�
�
�Z� �
�K��(�
�k�6�*�
�t�~�~�&�
��
�
�v�.�
�<�T�^�^�V�T�
/�����H�
��f�%�
�t�}�}�f�5�
��f�%�
�"�4�=�=�1�
�Z� �
!�8�K��#D�E�
�;��'�
�{�F�+�

��&�,�,�'�
�F�L�L�!�
�F�L�L�+�.�
�F�L�L�&�)�
�&�,�,�'�
��&�,�,�'�
�F�L�L�!�
�F�L�L�+�.�
�F�L�L�&�)�
����%�
��F�L�L�)�
�F�L�L�!�
�F�L�L�+�.�
�F�L�L�&�)�
�&�,�,�'�
��&�,�,�'�
�F�L�L�!�
�F�L�L�+�.�
�F�L�L�&�)�
����%�
��G�O�O�V�,�
�Qk�F�Zrc
���eZdZdZdZdZgd�Zgd�ZddgZe	je	jzZdZ
d	Zd
ZdZdZid
d�dd�dd�dd�dd�dd�dd�dd�dd�dd�d d�d!d"�d#d"�d$d"�d%d&�d'd(�d)d*�id+d,�d-d.�d/d0�d1d2�d3d4�d5d6�d7d8�d9d:�d;d<�d=d>�d?d@�dAdB�dCdD�dEdF�dGdH�dIdJ�dKdL��idMdN�dOdP�dQdR�dSdT�dUdV�dWdX�dYdZ�d[d\�d]d^�d_d`�dadb�dcdd�dedf�dgdh�didj�dkdl�dmdn��idodp�dqdr�dsdt�dudv�dwdx�dydz�d{d|�d}d~�dd��d�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d���id�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d���id�d��d�d��d�d��d�d��d�d��d�d��d�d��d�d“d�dēd�dƓd�dȓd�dʓd�d̓d�dΓd�dГd�dғd�dԓ�id�d֓d�dؓd�dړd�dܓd�dޓd�d�d�d�d�d�d�d�d�d�d�d�d�d�d�d�d�d�d�d�d�d�d�d���id�d��d�d��d�d��d�d��d��d��d�d��d�d��d�d��d�d��d	�d
��d�d��d
�d��d�d��d�d��d�d��d�d��d�d��i�d�d��d�d��d�d��d�d ��d!�d"��d#�d$��d%�d&��d'�d(��d)�d*��d+�d,��d-�d.��d/�d0��d1�d2��d3�d4��d5�d6��d7�d8��d9�d:��i�d;�d<��d=�d>��d?�d@��dA�dB��dC�dD��dE�dF��dG�dH��dI�dJ��dK�dL��dM�dN��dO�dP��dQ�dR��dS�dT��dU�dV��dW�dX��dY�dZ��d[�d\��i�d]�d^��d_�d`��da�db��dc�dd��de�df��dg�dh��di�dj��dk�dl��dm�dn��do�dp��dq�dr��ds�dt��du�dv��dw�dx��dy�dz��d{�d|��d}�d~���d�d��d��d��d��d���Z�dd��Z�d��Z�d��Z�d��Z�d��Zg�d��d�j1e�z�d�zeej4�f��d�ej6f��d�ej4f��d�ej4f��d�ej4f��d�e
z�d�zeee��d�f��d�e
z�d�ze
z�d�zeee��d�f��d�eeeee�f�eee
�ef�eee
�d�����ej@f�eee
�ej@f��d�e
z�d�zejBf��d�ejBjDf��d�ejBjDf��d�e
z�d�zejBjDf��d�ejBf��d�ee#�f��d�e$jJf��d�e$jLf��d�e$jNf��d�e$jPf��d�e$jPf��d�e$jRf��d�e#jTf��d�e#jTf��d�ef��d�ee#jT�f��d�e#jTf��d�e#f�ee�e+f��d�e
z�d�zef��d�e#f��d�e#f�e,�d���d�ef�d�ef�d�e-fge,�d���d�e-�d�f�d�e-fg�d��d�j1e�z�d�zee��d�fe.�d��g�d�e-�d�f�d�e/e0�f�d�e#jTf�d�e#jTf�d�e#jTf�d�ej6f�d�ef�d�e#jTfg�d��Z1�d��Z2�f�d��Z3�xZ4S(�rzJ
    For Raku (a.k.a. Perl 6) source code.

    .. versionadded:: 2.0
    �Perl6zhttps://www.raku.org)�perl6�pl6�raku)rrz*.nqpz*.p6z*.6plz*.p6lz*.pl6z*.6pmz*.p6mz*.pm6rz*.rakuz	*.rakumodz
*.rakutestz	*.rakudocztext/x-perl6zapplication/x-perl6z['\w:-])Nr3�CATCHr4�CLOSE�CONTROL�DOCr6�ENTER�FIRSTr5�KEEP�LAST�LEAVE�NEXT�POST�PRE�QUIT�UNDO�anon�augment�but�class�constantr	�doesr"r#�enumr$�gather�given�grammar�hasr&r��is�let�loop�made�make�method�module�multir(�need�orwithr*�proceed�proto�repeatrr7z	return-rw�returns�role�rule�state�sub�	submethod�subset�succeed�	supersede�token�try�unitr.r/r�whenr0�with�without�export�native�repr�required�rw�symbol(�ACCEPTSr<�abs2rel�absoluter=�accessed�acos�acosec�acosech�acosh�acotan�acotanh�acquire�act�action�actions�add�
add_attribute�add_enum_value�add_fallback�
add_method�
add_parent�add_private_method�add_role�add_trustee�adverb�after�all�allocate�allof�allowedzalternative-names�annotations�antipair�	antipairs�any�anyof�app_lifetime�append�arch�archname�args�arity�Array�asec�asech�asin�asinhz
ASSIGN-KEYz
ASSIGN-POS�assuming�ast�at�atanr?�atanhzAT-KEYz
atomic-assignzatomic-dec-fetchzatomic-fetchzatomic-fetch-addzatomic-fetch-deczatomic-fetch-inczatomic-fetch-subzatomic-inc-fetchzAT-POS�
attributes�auth�await�	backtrace�Bag�BagHashzbail-out�base�basenamezbase-repeating�batchzBIND-KEYzBIND-POSzbind-stderrz
bind-stdinzbind-stdoutzbind-udp�bitsrB�block�Boolz	bool-only�bounds�break�Bridge�broken�BUILDz
build-date�bytes�cache�	callframezcalling-packagezCALL-ME�callsame�callwith�can�cancel�
candidates�candozcan-ok�	canonpath�caps�caption�Capture�cas�catdir�
categorizezcategorize-list�catfile�catpath�cause�ceiling�cglobal�changed�Channel�charsrD�childz
child-namezchild-typenamerErFrGrI�chrs�chunks�cis�classifyz
classify-list�cleanup�clonerK�closedzclose-stdinzcmp-ok�code�codes�collate�column�comb�combinations�command�comment�compiler�Complex�compose�compose_type�composer�	condition�config�configure_destroy�configure_type_checking�conjrM�constraints�	construct�contains�contents�copyrN�cosec�cosech�cosh�cotan�cotanh�countz
count-onlyz	cpu-coresz	cpu-usage�CREATE�create_type�cross�cue�curdir�curupdir�d�Date�DateTime�day�daycountzday-of-monthzday-of-weekzday-of-yearz
days-in-month�declaration�decode�decoder�deepmapr	rR�DEFINITE�delayedz
DELETE-KEYz
DELETE-POS�denominator�desc�DESTROY�
destroyers�devnull�diagzdid-you-meanrTzdies-ok�dir�dirnamezdir-sep�DISTROnamesr!rWzdoes-ok�donezdone-testing�duckmap�dynamic�e�eager�earlier�elems�emit�	enclosing�encode�encoder�encoding�endz	ends-with�enum_from_value�enum_value_list�enum_values�enumsr]�EVALzeval-dies-ok�EVALFILEz
eval-lives-ok�	exceptionzexcludes-maxzexcludes-minz
EXISTS-KEYz
EXISTS-POSra�exitcoderb�expectedzexplicitly-manage�expmod�	extension�f�failz
fails-like�fc�feature�file�filename�find_method�find_method_qualified�finish�first�flat�flatmap�flip�floor�flunk�flush�fmtr:�	formatter�freeze�fromz	from-listz	from-loopz
from-posix�fullzfull-barrier�get�	get_valuerh�gist�got�grab�	grabpairsr��handle�handled�handles�hardware�has_accessor�Hash�head�headerszhh-mm-ss�hidden�hides�hour�how�hyper�id�illegal�im�in�indentr��indices�indir�infinite�infixz	infix:<+>z	infix:<->�install_method_cache�Instant�instead�Intz
int-bounds�intervalzin-timezonezinvalid-str�invert�invocant�IOzIO::Notification.watch-path�
is_trusted�is_type�isazis-absolutezisa-okz	is-approxz	is-deeplyz	is-hiddenzis-initial-threadzis-intzis-lazyzis-leap-year�isNaN�isntzis-primezis-relativez
is-routinez
is-settingzis-win�item�iteratorr��keep�kept�KERNELnames�key�keyofr�r��kv�kxxv�l�langr'�lastcall�later�lazyr��leading�level�like�line�linesr��Listr��livezlives-okr��lockr��log10�lookup�lsbr`�MAINra�Map�match�max�maxpairs�merge�messagerb�method_table�methods�migrate�min�minmax�minpairs�minute�	misplaced�Mix�MixHashr��mode�modified�month�move�mro�msbrd�	multinessr(r
�named�named_names�narrow�
nativecastznative-descriptor�nativesizeofr2�new_typeznew-from-daycountznew-from-pairsr)�
nextcalleeznext-handle�nextsame�nextwith�NFC�NFD�NFKC�NFKDznl-inznl-out�nodemap�nok�none�norm�not�note�now�nude�Num�	numerator�Numeric�of�offsetzoffset-in-hourszoffset-in-minutes�ok�oldzon-close�onez	on-switchr��opened�	operation�optionalr��ords�origzos-error�osnamez
out-bufferr�r
zpackage-kindzpackage-name�packages�pair�pairs�pairup�	parameter�params�parentzparent-name�parents�parsez
parse-base�	parsefilezparse-names�parts�pass�pathzpath-sep�payloadz	peer-hostz	peer-port�periodsr�permutations�phaser�pick�	pickpairs�pid�placeholder�plan�plus�polar�poll�polymodr�r��
positional�posix�postfix�	postmatchzprecomp-extzprecomp-target�pred�prefix�prematch�prependr1r�zprint-nlzprint-to�private�private_method_table�proc�produce�Promise�prompt�protectzpull-oner�zpush-allz
push-at-leastzpush-exactlyzpush-until-lazy�putzqualifier-type�quit�r�race�radixr��range�Rat�rawrr��	readchars�readonly�ready�Real�
reallocate�reals�reason�rebless�receiver��redispatcherr+�reduce�rel2abs�relative�releaser��repeated�replacement�report�reserved�resolve�restorer�resume�rethrowr��rightr�r�rk�roles_to_compose�rolish�roll�rootdir�roots�rotate�rotor�round�
roundrobinzroutine-type�run�rwx�s�samecase�samemark�samewith�sayzschedule-on�	scheduler�scope�sec�sech�secondr��selfr��Set�
set_hidden�set_name�set_package�set_rw�	set_value�SetHashzset-instruments�setup_finalization�shape�share�shellr��sibling�sigil�sign�signal�signals�	signaturer��sinh�sinkzsink-all�skipz
skip-at-leastzskip-at-least-pull-onezskip-onez	skip-restr�zsleep-timerzsleep-until�Slip�slurpz
slurp-rest�slurpy�snap�snapper�sozsocket-hostzsocket-portr��sourcezsource-package�spawn�SPECr�r��splitdir�	splitpathr��spurtr��squishr��stable�start�startedzstarts-with�status�stderr�stdout�Str�
sub_signature�subbufz	subbuf-rw�subname�subparse�substzsubst-mutater�z	substr-eqz	substr-rw�subtest�succ�sum�Supplyr��t�tail�takeztake-rw�tan�tanh�tap�targetztarget-name�tc�tclcr�r-�throttle�throwzthrows-like�timezone�tmpdir�to�today�todo�togglezto-posix�total�trailing�trans�tree�trimztrim-leadingz
trim-trailingr�ztruncated-to�trusts�try_acquire�trying�twigil�type�
type_captures�typenamer��udp�uncaught_handler�unimatch�uniname�uninames�uniparse�uniprop�uniprops�unique�unival�univals�unliker��unlockr��unpolarr��unwrap�updir�USAGEzuse-ok�utc�val�valuer��VAR�variablezverbose-config�version�VMnames�volume�vow�wr�r��watchz
watch-path�weekzweekday-of-monthzweek-numberz	week-year�WHATrv�WHERE�	WHEREFORE�WHICH�WHOzwhole-second�WHY�wordcaser
�
workaround�wrapr�zwrite-to�x�yada�year�yieldz
yyyy-mm-dd�z�zipz
zip-latest)��False�True�Anyr��Associative�AST�	atomicint�	Attribute�	BacktracezBacktrace::Framer��Baggyr��Blob�Blockr��Buf�Callable�	CallFrame�Cancellationr��CArrayr��Coder�r��
ComplexStr�Cool�CurrentThreadScheduler�Cursorr�Dateishr�Distro�Duration�Encoding�	Exception�Failure�FatRat�GrammarrQ�
HyperWhateverrcre�int16�int32�int64�int8�IntStrrizIO::ArgFilesz
IO::CatHandlez
IO::HandlezIO::NotificationzIO::PathzIO::Path::Cygwinz
IO::Path::QNXzIO::Path::UnixzIO::Path::Win32zIO::Pipez
IO::SocketzIO::Socket::AsynczIO::Socket::INETzIO::SpeczIO::Spec::Cygwinz
IO::Spec::QNXzIO::Spec::UnixzIO::Spec::Win32zIO::Special�Iterable�Iterator�Junction�Kernel�Labelr��LockzLock::Async�long�longlong�Macror��MatchzMetamodel::AttributeContainerzMetamodel::C3MROzMetamodel::ClassHOWzMetamodel::EnumHOWzMetamodel::FinalizationzMetamodel::MethodContainerz!Metamodel::MROBasedMethodDispatchzMetamodel::MultipleInheritancezMetamodel::NamingzMetamodel::Primitivesz!Metamodel::PrivateMethodContainerzMetamodel::RoleContainerzMetamodel::Trusting�Methodr�r��Mixy�Mur�r�r�r��Nilr��num32�num64r��NumStr�ObjAt�Order�Pair�	Parameterrz
Pod::BlockzPod::Block::CodezPod::Block::CommentzPod::Block::DeclaratorzPod::Block::NamedzPod::Block::ParazPod::Block::TablezPod::Headingz	Pod::Item�Pointer�
Positional�PositionalBindFailover�ProczProc::Asyncr��Proxy�PseudoStash�	QuantHash�Ranger��Rational�RatStrr�r'�Routine�Scalar�	Scheduler�	Semaphore�Seqr!r'�Setty�	Signature�size_tr5�StashrH�StrDistance�Stringy�Sub�	Submethod�SupplierzSupplier::PreservingrQ�Systemic�Tap�	TelemetryzTelemetry::Instrument::ThreadzTelemetry::Instrument::UsagezTelemetry::PeriodzTelemetry::Sampler�Thread�ThreadPoolScheduler�UInt�uint16�uint32�uint64�uint8�Uni�utf8r0�Version�VM�Whatever�WhateverCode�
WrapHandle)f�X�Zr��also�and�andthen�before�cmp�div�eq�eqv�extra�ff�fff�ge�gt�le�leg�lt�m�mm�mod�ne�or�orelse�rxrr�r��xor�xxz++z--z**�!�+�-�~�?�|�||�+^�~^�?^�^�*�/�%z%%z+&z+<z+>z~&z~<z~>z?&�gcd�lcmrrz+|rz~|rz?|r r�&r!rTrWz<=>z..z..^z^..z^..^z!=z==�<z<=�>z>=z~~z===z!eqvz&&rz^^z//r�r�z??z!!rrr:r�z<==z==>z<<==z==>>�unicmp�(�)r(r)�[�]�{�}�«�»u༺u༻u༼u༽u᚛u᚜u‘u’u‚u‛u“u”u„u‟u‹u›u⁅u⁆u⁽u⁾u₍u₎u∈u∋u∉u∌u∊u∍u∕u⧵u∼u∽u≃u⋍u≒u≓u≔u≕u≤u≥u≦u≧u≨u≩u≪u≫u≮u≯u≰u≱u≲u≳u≴u≵u≶u≷u≸u≹u≺u≻u≼u≽u≾u≿u⊀u⊁u⊂u⊃u⊄u⊅u⊆u⊇u⊈u⊉u⊊u⊋u⊏u⊐u⊑u⊒u⊘u⦸u⊢u⊣u⊦u⫞u⊨u⫤u⊩u⫣u⊫u⫥u⊰u⊱u⊲u⊳u⊴u⊵u⊶u⊷u⋉u⋊u⋋u⋌u⋐u⋑u⋖u⋗u⋘u⋙u⋚u⋛u⋜u⋝u⋞u⋟u⋠u⋡u⋢u⋣u⋤u⋥u⋦u⋧u⋨u⋩u⋪u⋫u⋬u⋭u⋰u⋱u⋲u⋺u⋳u⋻u⋴u⋼u⋶u⋽u⋷u⋾u⌈u⌉u⌊u⌋u〈u〉u⎴u⎵u❨u❩u❪u❫u❬u❭u❮u❯u❰u❱u❲u❳u❴u❵u⟃u⟄u⟅u⟆u⟕u⟖u⟝u⟞u⟢u⟣u⟤u⟥u⟦u⟧u⟨u⟩u⟪u⟫u⦃u⦄u⦅u⦆u⦇u⦈u⦉u⦊u⦋u⦌u⦍u⦎u⦏u⦐u⦑u⦒u⦓u⦔u⦕u⦖u⦗u⦘u⧀u⧁u⧄u⧅u⧏u⧐u⧑u⧒u⧔u⧕u⧘u⧙u⧚u⧛u⧸u⧹u⧼u⧽u⨫u⨬u⨭u⨮u⨴u⨵u⨼u⨽u⩤u⩥u⩹u⩺u⩽u⩾u⩿u⪀u⪁u⪂u⪃u⪄u⪋u⪌u⪑u⪒u⪓u⪔u⪕u⪖u⪗u⪘u⪙u⪚u⪛u⪜u⪡u⪢u⪦u⪧u⪨u⪩u⪪u⪫u⪬u⪭u⪯u⪰u⪳u⪴u⪻u⪼u⪽u⪾u⪿u⫀u⫁u⫂u⫃u⫄u⫅u⫆u⫍u⫎u⫏u⫐u⫑u⫒u⫓u⫔u⫕u⫖u⫬u⫭u⫷u⫸u⫹u⫺u⸂u⸃u⸄u⸅u⸉u⸊u⸌u⸍u⸜u⸝u⸠u⸡u〈u〉u《u》u「u」u『u』u【u】u〔u〕u〖u〗u〘u〙u〚u〛u〝u〞u﴾u﴿u︗u︘u︵u︶u︷u︸u︹u︺u︻u︼u︽u︾u︿u﹀u﹁u﹂u﹃u﹄u﹇u﹈u﹙u﹚u﹛u﹜u﹝u﹞u(u)u>u]u}u⦆u」)u<u[u{u⦅u「�c��|�$d|zdjd�|D��z|zdzSd|zdz|zdzdjd�|D��zdz|zd	z|zdzS)
Nz\b(rc3�FK�|]}tj|����y�w�N�r�escape��.0r�s  r�	<genexpr>z/Perl6Lexer._build_word_match.<locals>.<genexpr>�s����.K��r�y�y��|�.K���!z)\bz(?<!r,r+c3�FK�|]}tj|����y�wr6r7r9s  rr;z/Perl6Lexer._build_word_match.<locals>.<genexpr>�s����6�1�"�)�)�A�,�6�r<z(?!)r�)r
�boundary_regex_fragmentr�r9s    r�_build_word_matchzPerl6Lexer._build_word_match�s���"�*��F�?�T�Y�Y�.K�U�.K�%K�K���� �
 ��4�4�t�;�f�D�t�K��	�	�6��6�6�7�9=�>�@F�G�IO�P�'�(�*.�/�
/rc����fd�}|S)Nc3��K�|j�}|d}t|�}|jd�}tjj|d�}|j
}|�%|j
||jd�|z�}	n{||z}
d}|jd�}|dkDr\|j
|||z�}
|j
|
||z�}|dk(rt|�}d}n|
dk7r
|
|kr|dz
}|
}n|dz}|}|dkDr�\}	|	dkrt|�}	|��tjd|�ry||jd�|z|	}tjdtj|�zdz||	dtj�}|r|	|j�z
}	nt|�}	|j��||j�|	|zf��|	|z|_
y�w)	N�	delimiter�adverbsr����z:to\bz^\s*z\s*$)�	groupdict�lenrFr�PERL6_BRACKETSr�findrCrrr8r%r%r�)�lexerr��context�groups�
opening_chars�n_charsrC�closerr�end_pos�
closing_chars�
nesting_level�
search_pos�
next_open_pos�next_close_pos�heredoc_terminator�end_heredoc�token_classs                 �r�callbackz.Perl6Lexer.brackets_callback.<locals>.callback�s�������_�_�&�F�"�;�/�M��-�(�G��j�j��+�G��.�.�2�2�=��3C�D�F��<�<�D��~��)�)�M�5�;�;�{�3K�g�3U�V��!'�� 0�
� !�
�"�[�[��5�
�#�a�'�$(�I�I�m�Z�'�=Q�$R�M�%)�Y�Y�}�j�7�>R�%S�N�%��+�),�T���()�
�&�"�,���1O�%��*�
�%2�
�%��*�
�%3�
�$�a�'�)����{��d�)���"�r�y�y��7�'C�%)�%�+�+�k�*B�W�*L�W�%U�"� �i�i��"�)�)�<N�2O�(O�(/�)0�15�g�h�����O����{���0�0�G�!�$�i�G��+�+�-��d�5�;�;�=��7�AR�.S�S�S�!�G�+�G�K�s
�C?G�CGr>)rXrYs` r�brackets_callbackzPerl6Lexer.brackets_callback�s���3	,�j�rc#�,K�|j}|j�t|j|j�|j	�f��|j	�|_t
|�dkDr|ddk(r|xjdz
c_yyy�w)Nr���rsrD)�stackrCrrr%r�rG�perl6_token_nesting_level�rJr�rKr]s    r�opening_brace_callbackz!Perl6Lexer.opening_brace_callback0sv�����
�
���k�k�m�T�7�<�<����
�e�i�i�k�#J�J�J��i�i�k����u�:��>�e�B�i�7�2��-�-��2�-�3�>�s�BBc#�lK�|j}|j�t|j|j�|j	�f��|j	�|_t
|�dkDr?|ddk(r6|xjdzc_|jdk(r|j�yyyy�w)Nrr\rsrDr)	r]rCrrr%r�rGr^r�r_s    r�closing_brace_callbackz!Perl6Lexer.closing_brace_callback=s������
�
���k�k�m�T�7�<�<����
�e�i�i�k�#J�J�J��i�i�k���
�u�:��>�e�B�i�7�2��-�-��2�-��0�0�A�5��	�	��6�3�>�s�B2B4c#�K�d|_|j�t|j|j�|j	�f��|j	�|_|jjd�y�w)NrDr)r^rCrrr%r�r]r�)rJr�rKs   r�embedded_perl6_callbackz"Perl6Lexer.embedded_perl6_callbackKsW����,-��)��k�k�m�T�7�<�<����
�e�i�i�k�#J�J�J��i�i�k����
�
���V�$�s�A;A=z$#[`|=](?P<delimiter>(?P<first_char>[z])(?P=first_char)*)z#[^\n]*$z%^(\s*)=begin\s+(\w+)\b.*?^\1=end\s+\2z^(\s*)=for.*?\n\s*?\nz
^=.*?\n\s*?\nz(regex|token|rule)(\s*z+:sym)�token-sym-bracketsz(regex|token|rule)(?!z)(\s*z+)?�	pre-tokenz(role)(\s+)(q)(\s*)z
(?::[UD])?r8z[$@%&][.^:?=!~]?u+(?:<<.*?>>|<.*?>|«.*?»)*u \$[!/](?:<<.*?>>|<.*?>|«.*?»)*z::\?\w+z[$@%&]\*z\$(?:<.*?>)+zn(?:q|qq|Q)[a-zA-Z]?\s*(?P<adverbs>:[\w\s:]+)?\s*(?P<delimiter>(?P<first_char>[^0-9a-zA-Z:\s])(?P=first_char)*)r�r�r�r�rrz(?<=~~)\s*/(?:\\\\|\\/|.)*?/z(?<=[=(,])\s*/(?:\\\\|\\/|.)*?/z
m\w+(?=\()z_(?:m|ms|rx)\s*(?P<adverbs>:[\w\s:]+)?\s*(?P<delimiter>(?P<first_char>[^\w:\s])(?P=first_char)*)zB(?:s|ss|tr)\s*(?::[\w\s:]+)?\s*/(?:\\\\|\\/|.)*?/(?:\\\\|\\/|.)*?/z
<[^\s=].*?\S>z\wr"rr�commonrrz.+?)rrsz(?P<delimiter>(?P<first_char>[)rrfrz,(?<=:)(?:my|our|state|constant|temp|let).*?;z<(?:[-!?+.]\s*)?\[.*?\]>z(?<!\\)'(\\\\|\\[^\\]|[^'\\])*'z(?<!\\)"(\\\\|\\[^\\]|[^"\\])*"z#.*?$)rgrrfrersc���d�}|j�}||�}dj|�}t|d�ryd}d}tjdt
jzdz|�rd}d}|D]y}tjd	d
|�}tjd|�r�1tjd|�rytjd
|�}|r|s|jd��yd}�ynd|vr|dz}|S)Nc��d}g}|D]H}tjd|�rd}�tjd|�rd}�5|r�8|j|��J|S)NFz
^=(?:end|cut)z^=\w+T)rr�r�)r��in_pod�stripped_linesr�s    r�	strip_podz*Perl6Lexer.analyse_text.<locals>.strip_pod�s[���F��N��
0���8�8�,�d�3�"�F��X�X�h��-�!�F��"�)�)�$�/�

0�"�!r�
zperl6|rakudo|niecza|pugsTFz(?:my|our|has)\s+(?:z
+\s+)?[$@%&(]g�������?z#.*r3z^\s*$z$^\s*(?:use\s+)?v6(?:\.\d(?:\.\d)?)?;z?^\s*(?:(?P<scope>my|our)\s+)?(?:module|class|role|enum|grammar)rg�������?rr)
�
splitlinesr�rrrr�PERL6_IDENTIFIER_RANGErnr��group)rrlr��
saw_perl_decl�ratingr��
class_decls       rrzPerl6Lexer.analyse_text�s	��	"����!���%� ���y�y�����4�!<�=���
����9�9�,�z�/P�/P�P�%�&�'+�-��F� �M��	�D��6�6�%��T�*�D��x�x��$�'���x�x�?��F�����"d�fj�k�J�� �J�$4�$4�W�$=�$I������	�"�4�<��a�K�F��
rc�R��t�|�di|��|jdd�|_y)Nr$zutf-8r>)�super�__init__rFr$)r �options�	__class__s  �rrvzPerl6Lexer.__init__�s%���
���#�7�#����J��8��
r)Nr3r3)5rrrrr
r r!r"r#rr%r$r&ro�PERL6_KEYWORDS�PERL6_BUILTINS�PERL6_BUILTIN_CLASSES�PERL6_OPERATORSrHr?rZr`rbrdr�rr*r)rrrrr,r0r1rrr2r3r4r5r6r'r
rrr	rrr=rrv�
__classcell__)rxs@rrr�s�����D�
 �C�&�G�,�I� �!6�7�I��L�L�2�9�9�$�E�'���N� r�N�h$��L�O�A��(�A�$�h�A�08�(�A��(�A�$�h�A�08�(�A�	�(�A�%�h�A�19�(�A�	�(�	A�%�h�	A�19�(�	A�
	�(�A�
%�h�A�
19�(�A�	�(�
A�%�h�
A�19�(�
A�	�(�A�%�h�A�19�(�A�	�(�A�%�h�A�19�(�A�	�(�A�%�h�A�19�(�A�	�(�A�%�h�A�19�(�A�	�(�A�%�h�A�19�(�A�	�(�A�%�h�A�19�(�A�	�(�A�%�h�A�19�(�A�	�(�A�%�h�A�19�(�A�	�(�A�%�h�A�19�(�A� 	�(�!A� %�h�!A� 19�(�!A�"	�(�#A�"%�h�#A�"19�(�#A�$	�(�%A�$%�h�%A�$19�(�%A�&	�(�'A�&%�h�'A�&19�(�'A�(	�(�)A�(%�h�)A�(19�(�)A�*	�(�+A�*%�h�+A�*19�(�+A�,	�(�-A�,%�h�-A�,19�(�-A�.	�(�/A�.%�h�/A�.19�(�/A�0	�(�1A�0%�h�1A�019�(�1A�2	�(�3A�2%�h�3A�219�(�3A�4	�(�5A�4%�h�5A�419�(�5A�6	�(�7A�6%�h�7A�619�(�7A�8	�(�9A�8%�h�9A�819�(�9A�:	�(�;A�:%�h�;A�:19�(�;A�<	�(�=A�<%�h�=A�<19�(�=A�>	�(�?A�>%�h�?A�>19�(�?A�@	�(�AA�@%�h�AA�@19�(�AA�B	�(�CA�B%�h�CA�B19�(�CA�D	�(�EA�D%�h�EA�D19�(�EA�F	�(�GA�F%�h�GA�F19�(�GA�H	�(�IA�H%�h�IA�H19�(�IA�J	�(�KA�J%�h�KA�J19�(�KA�L	�(�MA�L%�h�MA�L19�(�MA�N	�(�OA�N%�h�OA�N19�(�OA�P	�(�QA�P%�h�QA�P19�(�QA�R	�(�SA�R%�h�SA�R19�(�SA�T	�(�UA�T%�h�UA�T19�(�UA�V	�(�WA�V%�h�WA�V19�(�WA�X	�(�YA�X%�h�YA�X19�(�YA�Z	�(�[A�Z%�h�[A�Z19�(�[A�\	�(�]A�\%�h�]A�\19�(�]A�^	�(�_A�^%�h�_A�^19�(�_A�`	�(�aA�`%�h�aA�`19�(�aA�b	�(�cA�b%�h�cA�b19�(�cA�d	�(�eA�d%�h�eA�d19�(�eA�f	�(�gA�f%�h�gA�f19�(�gA�h	�(�iA�h%�h�iA�h19�(�iA�j	�(�kA�j%�h�kA�j19�(�kA�l	�(�mA�l%�h�mA�l19�(�mA�n	�(�oA�n%�h�oA�n19�(�oA�p	�(�qA�p%�h�qA�p19�(�qA�r	�(�sA�r%�h�sA�r19�(�sA�t	�(�uA�t%�h�uA�t19�(�uA�v	�(�wA�v%�h�wA�v19�(�wA�x	�(�yA�x%�h�yA�x19�(�yA�z	�(�{A�z%�h�{A�z19�(�{A�|	�(�}A�|%�h�}A�|19�(�}A�~	�(�A�~'/�(��h�(�AA�N�F/�6�p3��%�/
�
4�r�w�w�~�7N�
N�Qg�
g�
�w�0�0�
1�
3�/
��'�.�.�)�/
�6�w�7H�7H�I�	/
�
&�w�'8�'8�9�/
��w�0�0�1�
/
�'�)?�
?�(�
J�
�g�t�
$�&:�
<�/
�&�(>�
>��
I�Lb�
b�ej�
j�
�g�t�
$�k�
3�/
�$�X�g�z�4��%T�U�/
��~�/E�
F��P�/
��4�6L�Ua�
b�
�\�\�
�/
� �~�/E�
F����U�!/
�$!�#9�
9�<Y�
Y�
�]�]�
�%/
�(1�$�-�-�2F�2F�G�)/
�*����-�-�.�+/
�,�1�
1�4Q�
Q�
�]�]�
!�
!�
#�-/
�0�d�m�m�,�1/
�2"�#4�V�#<�
>�3/
�8$�V�Z�Z�0�9/
�:/��
�
�;�;/
�<!�&�*�*�-�=/
�>P�
�\�\�
�?/
�B/����=�C/
�D�F�N�N�+�E/
�F-�f�l�l�;�G/
�H0����>�I/
�J�D�!�K/
�L"�#4�V�\�\�#B�
D�M/
�PS�
�\�\�
�Q/
�T�v�&�U/
�V��
/��:�W/
�X�+�
+�c�
1�4�8�Y/
�Z)�&�1�[/
�\)�&�1�]/
�b
�H��
�*�+�
�*�+�
�T�N�	
�
�H��
�D�+�,�
�T�N�
�/�����1H�
H�K`�
`�
�t�
$�&;�
=��)�*�
��D�&�!�
<�e�D�k�J�
(�&�,�,�7�
/����>�
/����>�
�w�~�~�&�
�+�,�
�F�L�L�!�
�CM�F�^5�n9�9r)rr�pygments.lexerrrrrrrr	r
�pygments.tokenrrr
rrrrrr�
pygments.utilr�__all__rrr>rr�<module>r�sX���
� � � �$�$�$�)���
%��H�
�H�V|9�#�|9r