How this kind of perl code generated?

#!/usr/bin/perl -w
......
# per代码短（plain code）
......
__END__
^_<8b>^H^@^@
......
Ø ^@^WÃÿ^A}»¹fFÃ^P^A


Any friend can guide how to generate such perl script(plain code + compiled code)? And how to reverse it? I want to find the place to check 'project ID', I test debugging it with IDA by remote mode, but without a clue.

I'm not sure whether OneDrive share is permit here, I'll share it if someone can help, thanks.

Not sure whether OneDrive file share is permitted or not, if not, please Administrator just delete it, thanks.

test.run
https://xgdzkjdx-my.sharepoint.com/:u:/g/personal/bjzfl7v3m_gfw_ac_nz/EeTfqXmLRaREpElBFDYRko0BgM94M4EN0GoRJ-AS7fkgbw?e=qEgq6y