One Hat Cyber Team

Your IP: 216.73.216.133
Server IP: 185.119.109.197
Server: Linux managedhosting.chostar.me 5.15.0-160-generic #170-Ubuntu SMP Wed Oct 1 10:06:56 UTC 2025 x86_64
Server Software: Apache
PHP Version: 8.1.33
Buat File | Buat Folder

View File Name : make_tags.pl

#!/usr/bin/perl

while(<STDIN>) {
	s/\s/ /g;
	$list .= $_;
	}

while($list =~ /^\s*([a-z0-9]{1,2})\s+(.{15})(.*)$/) {
	$code = $1; $name = $2; $list = $3;
	$name =~ s/\s+$//;
	print "'$code' => '$name',\n";
	}