⚝
One Hat Cyber Team
⚝
Your IP:
18.117.93.231
Server IP:
162.254.39.145
Server:
Linux premium289.web-hosting.com 4.18.0-513.11.1.lve.el8.x86_64 #1 SMP Thu Jan 18 16:21:02 UTC 2024 x86_64
Server Software:
LiteSpeed
PHP Version:
8.2.28
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
lib64
/
guile
/
2.0
/
ccache
/
ice-9
/
View File Name :
regex.go
GOOF----LE-8-2.0r ] 3 4 h� ] g guile� � g define-module*� � � g ice-9� g regex� � g filenameS� f ice-9/regex.scm� g exportsS� g match:count� g match:string� g match:prefix� g match:suffix� g regexp-match?� g regexp-quote� g match:start� g match:end� g match:substring� g string-match� g regexp-substitute� g fold-matches� g list-matches� g regexp-substitute/global� � g set-current-module� � � g vector-length� g substring� g string?� !g integer?� "g call-with-output-string� #g string-for-each� $g write-char� %g make-regexp� &g regexp-exec� 'g for-each� (g display� )g pre� *g post� +g error� ,g wrong-type-arg� -g regexp?� .g regexp/notbol� /g string-length� 0g reverse!� 1g cons� 2g procedure?�C 5 h� � ]4 5 4 > " G h } ]4 5�C u g match g filenamef ice-9/regex.scm� ; �� < �� < �� g nameg match:count� C R h v ] �C n g match g filenamef ice-9/regex.scm� > �� ? �� g nameg match:string� C R h � ]4 5 4 56 ~ g match g filenamef ice-9/regex.scm� A �� B �� B $�� B �� g nameg match:prefix� CR h � ]4 54 56 ~ g match g filenamef ice-9/regex.scm� D �� E �� E "�� E �� g nameg match:suffix� CR ! hp M ] �$ a4 �5$ R" G4 5�$ C ��$ +4 ��5$ 4 ��5$ � "���CCC "���CC E g match l g i a g filenamef ice-9/regex.scm� J �� K �� K �� L �� L �� L �� K �� M �� N �� $ N �� ( N �� / O �� 0 O �� 4 N �� 5 P �� < P $�� = P �� ? P �� C O �� D Q �� K Q $�� L Q �� N Q �� R O �� U R �� [ R �� a M �� l g nameg regexp-match?� CR"#$ h � ] *�$ " = .�$ " / \�$ " ! ^�$ " $�$ " [�$ 4\L > " G L 6 (�$ " K )�$ " = +�$ " / ?�$ " ! {�$ " }�$ " |�$ 04[L > " G 4 L > " G ]L 6 L 6 � g c g filenamef ice-9/regex.scm� g �� h �� R j �� m k �� v h �� � m �� � n �� � o �� q �� C h Z ] O L 6 R g p g filenamef ice-9/regex.scm� f �� g �� C h w ] O 6 o g string g filenamef ice-9/regex.scm� d �� e �� g nameg regexp-quote� CR h0 � - . , 3 # ��� ��$ CC � g match , g n , g start , g filenamef ice-9/regex.scm� t �� u &�� u �� u �� u �� # v �� ' v �� , g nameg match:start� CR h0 � - . , 3 # ��� ��$ CC � g match , g n , g end , g filenamef ice-9/regex.scm� x �� y %�� y �� y �� y �� # z �� ' z �� , g nameg match:end� CR hP � - . , 3 # 4 5 4 5 $ $ 4 56CC � g match J g n J g start J g end ) J g filenamef ice-9/regex.scm� | �� } �� } �� ! ~ �� ) } �� 1 �� : �� F �� J g nameg match:substring� CR%& h0 � - 1 3 4 5�$ �" 6 � g pattern - g str - g args - g rx - g start - g filenamef ice-9/regex.scm� � �� � �� � �� � �� � �� � �� - � �� - g nameg string-match� CR' (!)*+, hh � ]4 5$ L64 5$ 4L 5L6 & 4L 5L6 & 4L 5L6 6 � g obj a g filenamef ice-9/regex.scm� � �� � �� � �� � )�� � �� � �� # � 2�� / � )�� 1 � �� 7 � �� : � 2�� D � )�� F � �� L � �� O � 2�� Y � )�� ] � %�� a � �� a C" h \ ] LL @ T g p g filenamef ice-9/regex.scm� � �� � �� C h0 � - 1 3 $ O 6O 6 � g port + g match + g items + g filenamef ice-9/regex.scm� � �� � �� � �� + � �� + g nameg regexp-substitute� CR-%./& h� 2 - . , 3 # 4 5$ " 4 5 " �H �$ " K 45�$ " 4J �5 $ P" 4 54 5 "���4 54 5�$ $ � "��y"���"���C "��` * g regexp � g string � g init � g proc � g flags � g regexp - � g start 3 � g value 3 � g abuts 3 � g bol 4 � g m j � g filenamef ice-9/regex.scm� � �� � �� � �� ' � ,�� - � �� 3 � �� 9 � �� > � �� J � �� Q � �� U � �� [ � �� h � 4�� j � �� j � �� r � �� w � �� ~ � �� � � �� � � �� � � �� � � "�� � � �� � � �� � � �� � � �� � � �� � � �� � g nameg fold-matches� CR01 h( � - . , 3 # 4 56 � g regexp ' g string ' g flags ' g filenamef ice-9/regex.scm� � �� � �� � (�� % � �� ' � �� ' g nameg list-matches� CR( (!2) *+, h� E ]4 5$ L64 5$ 4L 5L64 5$ 4 L 5L6 & 4LL4L 55L6 & LL�4 L 56 6 = g item � g filenamef ice-9/regex.scm� � �� � �� � �� � &�� � �� � �� # � /�� / � &�� 0 � �� : � �� = � /�� G � &�� K � �� O � �� R � �� Y � -�� a � �� e � �� i � �� m � �� r � �� s � .�� { � �� � �� � � �� � g nameg do-item� C hx \ ] ( 4L5L6 � " OO LL LQ �$ *�( �64�> " G � "���CL "��� T g matches w g start w g m w g items o g do-item - o g filenamef ice-9/regex.scm� � �� � �� � �� � �� � �� � �� � �� ? � �� C � �� F � �� J � �� O � !�� Q � �� R � �� W � #�� \ � �� g � %�� m � �� o � �� w g nameg next-match� C" h \ ] LLL @ T g p g filenamef ice-9/regex.scm� � �� � �� C hH � - 1 3 $ $O Q 45 6O 6 � g port B g regexp B g string B g items B g next-match 3 g filenamef ice-9/regex.scm� � �� � �� � �� ( � �� 3 � �� B � �� B g nameg regexp-substitute/global� CRC � g m ( g filenamef ice-9/regex.scm� ' �� � ; �� Y > �� A �� � D �� � J �� j d �� j t �� f x �� � | �� � � �� � � �� � � �� � � �� � � �� � C6