-module(blah@internet). -compile(no_auto_import). -export([username/0, email/0, password/0, passphrase/0, domain_name/0, url/0, ip_v4/0, ip_v6/0, mac/0, long_hex_color/0, short_hex_color/0, hex_color/0, mongo_object_id/0, semver/0, language_code/0, status_code/0, status_code_in_class/1, currency_symbol/0, currency_code/0, roman_numeral/2]). -export_type([http_status_class/0]). -type http_status_class() :: informational | successful | redirection | client_error | server_error. -spec username() -> binary(). username() -> Adjective = blah@en@word:adjective(), Last_name = blah@name:last_name(), Nonce = gleam@int:random(4, 2048), case Nonce rem 4 of 0 -> _pipe = [Adjective, Last_name], blah@utils:join(_pipe, <<""/utf8>>); 1 -> _pipe@2 = [Adjective, begin _pipe@1 = Last_name, gleam@string:lowercase(_pipe@1) end], blah@utils:join(_pipe@2, <<"."/utf8>>); 2 -> _pipe@4 = [Adjective, begin _pipe@3 = Last_name, gleam@string:lowercase(_pipe@3) end], blah@utils:join(_pipe@4, <<"-"/utf8>>); 3 -> _pipe@6 = [Adjective, begin _pipe@5 = Last_name, gleam@string:lowercase(_pipe@5) end], blah@utils:join(_pipe@6, <<"_"/utf8>>) end. -spec email() -> binary(). email() -> {ok, Email_domain@1} = case blah@utils:get_random_item( [<<"aol.com"/utf8>>, <<"gmail.com"/utf8>>, <<"hotmail.com"/utf8>>, <<"live.com"/utf8>>, <<"mail.ru"/utf8>>, <<"msn.com"/utf8>>, <<"outlook.com"/utf8>>, <<"proton.me"/utf8>>, <<"protonmail.com"/utf8>>, <<"yahoo.com"/utf8>>, <<"ymail.com"/utf8>>] ) of {ok, Email_domain} -> {ok, Email_domain}; _try -> erlang:error(#{gleam_error => assert, message => <<"Assertion pattern match failed"/utf8>>, value => _try, module => <<"blah/internet"/utf8>>, function => <<"email"/utf8>>, line => 122}) end, _pipe = [username(), Email_domain@1], blah@utils:join(_pipe, <<"@"/utf8>>). -spec password() -> binary(). password() -> Length = gleam@int:random(8, 32), blah@en@string:alphanumeric(Length). -spec passphrase() -> binary(). passphrase() -> _pipe@1 = [blah@en@word:adjective(), begin _pipe = blah@name:first_name(), gleam@string:lowercase(_pipe) end, blah@en@word:verb(), blah@en@word:adverb()], blah@utils:join(_pipe@1, <<" "/utf8>>). -spec domain_name() -> binary(). domain_name() -> Adjective = blah@en@word:adjective(), Noun = blah@en@word:noun(), Nonce = gleam@int:random(4, 2048), Hostname = case Nonce rem 3 of 0 -> _pipe = [Adjective, Noun], blah@utils:join(_pipe, <<"."/utf8>>); 1 -> _pipe@1 = [Adjective, Noun], blah@utils:join(_pipe@1, <<"-"/utf8>>); 2 -> _pipe@2 = [Adjective, Noun], blah@utils:join(_pipe@2, <<"_"/utf8>>) end, {ok, Suffix@1} = case blah@utils:get_random_item( [<<"co"/utf8>>, <<"com"/utf8>>, <<"edu"/utf8>>, <<"gov"/utf8>>, <<"int"/utf8>>, <<"io"/utf8>>, <<"mil"/utf8>>, <<"net"/utf8>>, <<"org"/utf8>>] ) of {ok, Suffix} -> {ok, Suffix}; _try -> erlang:error(#{gleam_error => assert, message => <<"Assertion pattern match failed"/utf8>>, value => _try, module => <<"blah/internet"/utf8>>, function => <<"domain_name"/utf8>>, line => 163}) end, _pipe@3 = [Hostname, Suffix@1], blah@utils:join(_pipe@3, <<"."/utf8>>). -spec url() -> binary(). url() -> {ok, Protocol@1} = case blah@utils:get_random_item( [<<"http"/utf8>>, <<"https"/utf8>>] ) of {ok, Protocol} -> {ok, Protocol}; _try -> erlang:error(#{gleam_error => assert, message => <<"Assertion pattern match failed"/utf8>>, value => _try, module => <<"blah/internet"/utf8>>, function => <<"url"/utf8>>, line => 170}) end, _pipe = [Protocol@1, <<"://"/utf8>>, domain_name()], blah@utils:join(_pipe, <<""/utf8>>). -spec ip_v4() -> binary(). ip_v4() -> _pipe = gleam@list:repeat(<<""/utf8>>, 4), _pipe@1 = gleam@list:map(_pipe, fun(_) -> gleam@int:random(0, 256) end), _pipe@2 = gleam@list:map(_pipe@1, fun gleam@int:to_string/1), blah@utils:join(_pipe@2, <<"."/utf8>>). -spec ip_v6() -> binary(). ip_v6() -> _pipe = gleam@list:repeat(<<""/utf8>>, 8), _pipe@1 = gleam@list:map(_pipe, fun(_) -> gleam@int:random(0, 65536) end), _pipe@4 = gleam@list:map( _pipe@1, fun(Field) -> _pipe@2 = Field, _pipe@3 = gleam@int:to_base16(_pipe@2), gleam@string:lowercase(_pipe@3) end ), blah@utils:join(_pipe@4, <<":"/utf8>>). -spec mac() -> binary(). mac() -> _pipe = gleam@list:repeat(<<""/utf8>>, 6), _pipe@1 = gleam@list:map(_pipe, fun(_) -> gleam@int:random(0, 256) end), _pipe@4 = gleam@list:map( _pipe@1, fun(Field) -> _pipe@2 = Field, _pipe@3 = gleam@int:to_base16(_pipe@2), gleam@string:lowercase(_pipe@3) end ), blah@utils:join(_pipe@4, <<":"/utf8>>). -spec long_hex_color() -> binary(). long_hex_color() -> _pipe@5 = [<<"#"/utf8>> | begin _pipe = gleam@list:repeat(<<""/utf8>>, 3), _pipe@1 = gleam@list:map( _pipe, fun(_) -> gleam@int:random(0, 256) end ), gleam@list:map( _pipe@1, fun(Field) -> _pipe@2 = Field, _pipe@3 = gleam@int:to_base16(_pipe@2), _pipe@4 = gleam@string:lowercase(_pipe@3), gleam@string:pad_left(_pipe@4, 2, <<"0"/utf8>>) end ) end], blah@utils:join(_pipe@5, <<""/utf8>>). -spec short_hex_color() -> binary(). short_hex_color() -> _pipe@4 = [<<"#"/utf8>> | begin _pipe = gleam@list:repeat(<<""/utf8>>, 3), _pipe@1 = gleam@list:map( _pipe, fun(_) -> gleam@int:random(0, 15) end ), gleam@list:map( _pipe@1, fun(Field) -> _pipe@2 = Field, _pipe@3 = gleam@int:to_base16(_pipe@2), gleam@string:lowercase(_pipe@3) end ) end], blah@utils:join(_pipe@4, <<""/utf8>>). -spec hex_color() -> binary(). hex_color() -> Nonce = gleam@int:random(4, 2048), case Nonce rem 2 of 0 -> long_hex_color(); 1 -> short_hex_color() end. -spec mongo_object_id() -> binary(). mongo_object_id() -> _pipe = gleam@list:repeat(<<""/utf8>>, 24), _pipe@1 = gleam@list:map(_pipe, fun(_) -> gleam@int:random(0, 15) end), _pipe@4 = gleam@list:map( _pipe@1, fun(Digit) -> _pipe@2 = Digit, _pipe@3 = gleam@int:to_base16(_pipe@2), gleam@string:lowercase(_pipe@3) end ), blah@utils:join(_pipe@4, <<""/utf8>>). -spec semver() -> binary(). semver() -> _pipe = gleam@list:repeat(<<""/utf8>>, gleam@int:random(2, 4)), _pipe@1 = gleam@list:map(_pipe, fun(_) -> gleam@int:random(0, 32) end), _pipe@2 = gleam@list:map(_pipe@1, fun gleam@int:to_string/1), blah@utils:join(_pipe@2, <<"."/utf8>>). -spec language_code() -> binary(). language_code() -> {ok, Code@1} = case begin _pipe = [<<"aa"/utf8>>, <<"ab"/utf8>>, <<"ae"/utf8>>, <<"af"/utf8>>, <<"ak"/utf8>>, <<"am"/utf8>>, <<"an"/utf8>>, <<"ar"/utf8>>, <<"as"/utf8>>, <<"av"/utf8>>, <<"ay"/utf8>>, <<"az"/utf8>>, <<"ba"/utf8>>, <<"be"/utf8>>, <<"bg"/utf8>>, <<"bh"/utf8>>, <<"bi"/utf8>>, <<"bm"/utf8>>, <<"bn"/utf8>>, <<"bo"/utf8>>, <<"br"/utf8>>, <<"bs"/utf8>>, <<"ca"/utf8>>, <<"ce"/utf8>>, <<"ch"/utf8>>, <<"co"/utf8>>, <<"cr"/utf8>>, <<"cs"/utf8>>, <<"cu"/utf8>>, <<"cv"/utf8>>, <<"cy"/utf8>>, <<"da"/utf8>>, <<"de"/utf8>>, <<"dv"/utf8>>, <<"dz"/utf8>>, <<"ee"/utf8>>, <<"el"/utf8>>, <<"en"/utf8>>, <<"eo"/utf8>>, <<"es"/utf8>>, <<"et"/utf8>>, <<"eu"/utf8>>, <<"fa"/utf8>>, <<"ff"/utf8>>, <<"fi"/utf8>>, <<"fj"/utf8>>, <<"fo"/utf8>>, <<"fr"/utf8>>, <<"fy"/utf8>>, <<"ga"/utf8>>, <<"gd"/utf8>>, <<"gl"/utf8>>, <<"gn"/utf8>>, <<"gu"/utf8>>, <<"gv"/utf8>>, <<"ha"/utf8>>, <<"he"/utf8>>, <<"hi"/utf8>>, <<"ho"/utf8>>, <<"hr"/utf8>>, <<"ht"/utf8>>, <<"hu"/utf8>>, <<"hy"/utf8>>, <<"hz"/utf8>>, <<"ia"/utf8>>, <<"id"/utf8>>, <<"ie"/utf8>>, <<"ig"/utf8>>, <<"ii"/utf8>>, <<"ik"/utf8>>, <<"io"/utf8>>, <<"is"/utf8>>, <<"it"/utf8>>, <<"iu"/utf8>>, <<"ja"/utf8>>, <<"jv"/utf8>>, <<"ka"/utf8>>, <<"kg"/utf8>>, <<"ki"/utf8>>, <<"kj"/utf8>>, <<"kk"/utf8>>, <<"kl"/utf8>>, <<"km"/utf8>>, <<"kn"/utf8>>, <<"ko"/utf8>>, <<"kr"/utf8>>, <<"ks"/utf8>>, <<"ku"/utf8>>, <<"kv"/utf8>>, <<"kw"/utf8>>, <<"ky"/utf8>>, <<"la"/utf8>>, <<"lb"/utf8>>, <<"lg"/utf8>>, <<"li"/utf8>>, <<"ln"/utf8>>, <<"lo"/utf8>>, <<"lt"/utf8>>, <<"lu"/utf8>>, <<"lv"/utf8>>, <<"mg"/utf8>>, <<"mh"/utf8>>, <<"mi"/utf8>>, <<"mk"/utf8>>, <<"ml"/utf8>>, <<"mn"/utf8>>, <<"mr"/utf8>>, <<"ms"/utf8>>, <<"mt"/utf8>>, <<"my"/utf8>>, <<"na"/utf8>>, <<"nb"/utf8>>, <<"nd"/utf8>>, <<"ne"/utf8>>, <<"ng"/utf8>>, <<"nl"/utf8>>, <<"nn"/utf8>>, <<"no"/utf8>>, <<"nr"/utf8>>, <<"nv"/utf8>>, <<"ny"/utf8>>, <<"oc"/utf8>>, <<"oj"/utf8>>, <<"om"/utf8>>, <<"or"/utf8>>, <<"os"/utf8>>, <<"pa"/utf8>>, <<"pi"/utf8>>, <<"pl"/utf8>>, <<"ps"/utf8>>, <<"pt"/utf8>>, <<"qu"/utf8>>, <<"rm"/utf8>>, <<"rn"/utf8>>, <<"ro"/utf8>>, <<"ru"/utf8>>, <<"rw"/utf8>>, <<"sa"/utf8>>, <<"sc"/utf8>>, <<"sd"/utf8>>, <<"se"/utf8>>, <<"sg"/utf8>>, <<"si"/utf8>>, <<"sk"/utf8>>, <<"sl"/utf8>>, <<"sm"/utf8>>, <<"sn"/utf8>>, <<"so"/utf8>>, <<"sq"/utf8>>, <<"sr"/utf8>>, <<"ss"/utf8>>, <<"st"/utf8>>, <<"su"/utf8>>, <<"sv"/utf8>>, <<"sw"/utf8>>, <<"ta"/utf8>>, <<"te"/utf8>>, <<"tg"/utf8>>, <<"th"/utf8>>, <<"ti"/utf8>>, <<"tk"/utf8>>, <<"tl"/utf8>>, <<"tn"/utf8>>, <<"to"/utf8>>, <<"tr"/utf8>>, <<"ts"/utf8>>, <<"tt"/utf8>>, <<"tw"/utf8>>, <<"ty"/utf8>>, <<"ug"/utf8>>, <<"uk"/utf8>>, <<"ur"/utf8>>, <<"uz"/utf8>>, <<"ve"/utf8>>, <<"vi"/utf8>>, <<"vo"/utf8>>, <<"wa"/utf8>>, <<"wo"/utf8>>, <<"xh"/utf8>>, <<"yi"/utf8>>, <<"yo"/utf8>>, <<"za"/utf8>>, <<"zh"/utf8>>, <<"zu"/utf8>>], blah@utils:get_random_item(_pipe) end of {ok, Code} -> {ok, Code}; _try -> erlang:error(#{gleam_error => assert, message => <<"Assertion pattern match failed"/utf8>>, value => _try, module => <<"blah/internet"/utf8>>, function => <<"language_code"/utf8>>, line => 262}) end, Code@1. -spec status_code() -> integer(). status_code() -> {ok, {_@2, Codes@1}} = case begin _pipe = [{<<"informational"/utf8>>, [100, 101, 102, 103]}, {<<"successful"/utf8>>, [200, 201, 202, 203, 204, 205, 206, 207, 208, 226]}, {<<"redirection"/utf8>>, [300, 301, 302, 303, 304, 305, 306, 307, 308]}, {<<"client_error"/utf8>>, [400, 401, 402, 403, 404, 405, 406, 407, 408, 409, 410, 411, 412, 413, 414, 415, 416, 417, 418, 421, 422, 423, 424, 425, 426, 428, 429, 431, 451]}, {<<"server_error"/utf8>>, [500, 501, 502, 503, 504, 505, 506, 507, 508, 510, 511]}], blah@utils:get_random_item(_pipe) end of {ok, {_@1, Codes}} -> {ok, {_@1, Codes}}; _try -> erlang:error(#{gleam_error => assert, message => <<"Assertion pattern match failed"/utf8>>, value => _try, module => <<"blah/internet"/utf8>>, function => <<"status_code"/utf8>>, line => 269}) end, {ok, Code@1} = case begin _pipe@1 = Codes@1, blah@utils:get_random_item(_pipe@1) end of {ok, Code} -> {ok, Code}; _try@1 -> erlang:error(#{gleam_error => assert, message => <<"Assertion pattern match failed"/utf8>>, value => _try@1, module => <<"blah/internet"/utf8>>, function => <<"status_code"/utf8>>, line => 273}) end, Code@1. -spec status_code_in_class(http_status_class()) -> integer(). status_code_in_class(Class) -> Class_string = case Class of informational -> <<"informational"/utf8>>; successful -> <<"successful"/utf8>>; redirection -> <<"redirection"/utf8>>; client_error -> <<"client_error"/utf8>>; server_error -> <<"server_error"/utf8>> end, [{_@1, Codes}] = begin _pipe = [{<<"informational"/utf8>>, [100, 101, 102, 103]}, {<<"successful"/utf8>>, [200, 201, 202, 203, 204, 205, 206, 207, 208, 226]}, {<<"redirection"/utf8>>, [300, 301, 302, 303, 304, 305, 306, 307, 308]}, {<<"client_error"/utf8>>, [400, 401, 402, 403, 404, 405, 406, 407, 408, 409, 410, 411, 412, 413, 414, 415, 416, 417, 418, 421, 422, 423, 424, 425, 426, 428, 429, 431, 451]}, {<<"server_error"/utf8>>, [500, 501, 502, 503, 504, 505, 506, 507, 508, 510, 511]}], gleam@list:filter( _pipe, fun(Kv) -> gleam@pair:first(Kv) =:= Class_string end ) end, {ok, Code@1} = case begin _pipe@1 = Codes, blah@utils:get_random_item(_pipe@1) end of {ok, Code} -> {ok, Code}; _try -> erlang:error(#{gleam_error => assert, message => <<"Assertion pattern match failed"/utf8>>, value => _try, module => <<"blah/internet"/utf8>>, function => <<"status_code_in_class"/utf8>>, line => 293}) end, Code@1. -spec currency_symbol() -> binary(). currency_symbol() -> {ok, Symbol@1} = case begin _pipe = [<<"$"/utf8>>, <<"£"/utf8>>, <<"¥"/utf8>>, <<"ƒ"/utf8>>, <<"р"/utf8>>, <<"֏"/utf8>>, <<"৳"/utf8>>, <<"฿"/utf8>>, <<"₡"/utf8>>, <<"₦"/utf8>>, <<"₩"/utf8>>, <<"₪"/utf8>>, <<"₫"/utf8>>, <<"€"/utf8>>, <<"₭"/utf8>>, <<"₮"/utf8>>, <<"₱"/utf8>>, <<"₲"/utf8>>, <<"₴"/utf8>>, <<"₵"/utf8>>, <<"₸"/utf8>>, <<"₹"/utf8>>, <<"₺"/utf8>>, <<"₼"/utf8>>, <<"₽"/utf8>>, <<"₾"/utf8>>], blah@utils:get_random_item(_pipe) end of {ok, Symbol} -> {ok, Symbol}; _try -> erlang:error(#{gleam_error => assert, message => <<"Assertion pattern match failed"/utf8>>, value => _try, module => <<"blah/internet"/utf8>>, function => <<"currency_symbol"/utf8>>, line => 301}) end, Symbol@1. -spec currency_code() -> binary(). currency_code() -> {ok, Code@1} = case begin _pipe = [<<"aed"/utf8>>, <<"afn"/utf8>>, <<"all"/utf8>>, <<"amd"/utf8>>, <<"ang"/utf8>>, <<"aoa"/utf8>>, <<"ars"/utf8>>, <<"aud"/utf8>>, <<"awg"/utf8>>, <<"azn"/utf8>>, <<"bam"/utf8>>, <<"bbd"/utf8>>, <<"bdt"/utf8>>, <<"bgn"/utf8>>, <<"bhd"/utf8>>, <<"bif"/utf8>>, <<"bmd"/utf8>>, <<"bnd"/utf8>>, <<"bob"/utf8>>, <<"brl"/utf8>>, <<"bsd"/utf8>>, <<"btn"/utf8>>, <<"bwp"/utf8>>, <<"byn"/utf8>>, <<"bzd"/utf8>>, <<"cad"/utf8>>, <<"cdf"/utf8>>, <<"chf"/utf8>>, <<"clp"/utf8>>, <<"cny"/utf8>>, <<"cop"/utf8>>, <<"crc"/utf8>>, <<"cup"/utf8>>, <<"cve"/utf8>>, <<"czk"/utf8>>, <<"djf"/utf8>>, <<"dkk"/utf8>>, <<"dop"/utf8>>, <<"dzd"/utf8>>, <<"egp"/utf8>>, <<"ern"/utf8>>, <<"etb"/utf8>>, <<"eur"/utf8>>, <<"fjd"/utf8>>, <<"fkp"/utf8>>, <<"gbp"/utf8>>, <<"gel"/utf8>>, <<"ghs"/utf8>>, <<"gip"/utf8>>, <<"gmd"/utf8>>, <<"gnf"/utf8>>, <<"gtq"/utf8>>, <<"gyd"/utf8>>, <<"hkd"/utf8>>, <<"hnl"/utf8>>, <<"hrk"/utf8>>, <<"htg"/utf8>>, <<"huf"/utf8>>, <<"idr"/utf8>>, <<"ils"/utf8>>, <<"inr"/utf8>>, <<"iqd"/utf8>>, <<"irr"/utf8>>, <<"isk"/utf8>>, <<"jmd"/utf8>>, <<"jod"/utf8>>, <<"jpy"/utf8>>, <<"kes"/utf8>>, <<"kgs"/utf8>>, <<"khr"/utf8>>, <<"kmf"/utf8>>, <<"kpw"/utf8>>, <<"krw"/utf8>>, <<"kwd"/utf8>>, <<"kyd"/utf8>>, <<"kzt"/utf8>>, <<"lak"/utf8>>, <<"lbp"/utf8>>, <<"lkr"/utf8>>, <<"lrd"/utf8>>, <<"lsl"/utf8>>, <<"lyd"/utf8>>, <<"lek"/utf8>>, <<"lev"/utf8>>, <<"mad"/utf8>>, <<"mdl"/utf8>>, <<"mga"/utf8>>, <<"mkd"/utf8>>, <<"mmk"/utf8>>, <<"mnt"/utf8>>, <<"mop"/utf8>>, <<"mru"/utf8>>, <<"mur"/utf8>>, <<"mvr"/utf8>>, <<"mwk"/utf8>>, <<"mxn"/utf8>>, <<"myr"/utf8>>, <<"mzn"/utf8>>, <<"nad"/utf8>>, <<"ngn"/utf8>>, <<"nio"/utf8>>, <<"nok"/utf8>>, <<"npr"/utf8>>, <<"nzd"/utf8>>, <<"nkf"/utf8>>, <<"omr"/utf8>>, <<"pab"/utf8>>, <<"pen"/utf8>>, <<"pgk"/utf8>>, <<"php"/utf8>>, <<"pkr"/utf8>>, <<"pln"/utf8>>, <<"pyg"/utf8>>, <<"qar"/utf8>>, <<"ron"/utf8>>, <<"rsd"/utf8>>, <<"rub"/utf8>>, <<"rwf"/utf8>>, <<"sar"/utf8>>, <<"sbd"/utf8>>, <<"scr"/utf8>>, <<"sdg"/utf8>>, <<"sek"/utf8>>, <<"sgd"/utf8>>, <<"shp"/utf8>>, <<"sle"/utf8>>, <<"sos"/utf8>>, <<"srd"/utf8>>, <<"ssp"/utf8>>, <<"stn"/utf8>>, <<"syp"/utf8>>, <<"szl"/utf8>>, <<"thb"/utf8>>, <<"tjs"/utf8>>, <<"tmt"/utf8>>, <<"tnd"/utf8>>, <<"top"/utf8>>, <<"try"/utf8>>, <<"ttd"/utf8>>, <<"twd"/utf8>>, <<"tzs"/utf8>>, <<"uah"/utf8>>, <<"ugx"/utf8>>, <<"usd"/utf8>>, <<"uyu"/utf8>>, <<"uzs"/utf8>>, <<"ved"/utf8>>, <<"ves"/utf8>>, <<"vnd"/utf8>>, <<"vuv"/utf8>>, <<"wst"/utf8>>, <<"xaf"/utf8>>, <<"xcd"/utf8>>, <<"xof"/utf8>>, <<"xpf"/utf8>>, <<"yer"/utf8>>, <<"zar"/utf8>>, <<"zmw"/utf8>>], blah@utils:get_random_item(_pipe) end of {ok, Code} -> {ok, Code}; _try -> erlang:error(#{gleam_error => assert, message => <<"Assertion pattern match failed"/utf8>>, value => _try, module => <<"blah/internet"/utf8>>, function => <<"currency_code"/utf8>>, line => 308}) end, Code@1. -spec roman_numeral(integer(), integer()) -> binary(). roman_numeral(Min, Max) -> _pipe = gleam@int:random(Min, Max), _pipe@1 = gleam@list:repeat(<<"I"/utf8>>, _pipe), _pipe@2 = blah@utils:join(_pipe@1, <<""/utf8>>), _pipe@3 = gleam@string:replace(_pipe@2, <<"IIIII"/utf8>>, <<"V"/utf8>>), _pipe@4 = gleam@string:replace(_pipe@3, <<"VV"/utf8>>, <<"X"/utf8>>), _pipe@5 = gleam@string:replace(_pipe@4, <<"XXXXX"/utf8>>, <<"L"/utf8>>), _pipe@6 = gleam@string:replace(_pipe@5, <<"LL"/utf8>>, <<"C"/utf8>>), _pipe@7 = gleam@string:replace(_pipe@6, <<"CCCCC"/utf8>>, <<"D"/utf8>>), _pipe@8 = gleam@string:replace(_pipe@7, <<"DD"/utf8>>, <<"M"/utf8>>), _pipe@9 = gleam@string:replace(_pipe@8, <<"MCCCC"/utf8>>, <<"CM"/utf8>>), _pipe@10 = gleam@string:replace(_pipe@9, <<"CCCC"/utf8>>, <<"CD"/utf8>>), _pipe@11 = gleam@string:replace(_pipe@10, <<"LXXXX"/utf8>>, <<"XC"/utf8>>), _pipe@12 = gleam@string:replace(_pipe@11, <<"XXXX"/utf8>>, <<"XL"/utf8>>), _pipe@13 = gleam@string:replace(_pipe@12, <<"VIIII"/utf8>>, <<"IX"/utf8>>), gleam@string:replace(_pipe@13, <<"IIII"/utf8>>, <<"IV"/utf8>>).