perl-Context-Preserve-0.03-15.red80> K KtĉH2!c31^ Wgeqsupport@red-soft.ru  Wgz21m,`wM3; V*yT4ʱx$^Zl͵b#h m -p쮹&Vぺ%ȫ[ #f׺tYxtTZ_fFL@X/&GUd|P_Ɯ'4YEYL}P֠Ȏ* nYFnK [F{ƾe B<Vx80?rf)i}gb0f50ad90fff8f43cdadade58bb4bcc548ce37b48c79be1f8567321ecd32f69bb5724e91ef7a2ada6c29c34649c9f64af65864d0DERSP;+}x>=?d & _ $,09BS \h              "P t   (89: 4G X H | I X Y \ ] ^ ib 8d e f l t u v w x y   DHCperl-Context-Preserve0.0315.red80Run code after a subroutine call, preserving the contextSometimes you need to call a function, get the results, act on the results, then return the result of the function. This is painful because of contexts; the original function can behave different if it's called in void, scalar, or list context. You can ignore the various cases and just pick one, but that's fragile. To do things right, you need to see which case you're being called in, and then call the function in that context. This results in 3 code paths, which is a pain to type in (and maintain). This module automates the process. You provide a code reference that is the "original function", and another code reference to run after running the original. You can modify the return value (aliased to @_) here, and do whatever else you need to do. 'wantarray' is correct inside both code references; in "after", though, the return value is ignored and the value 'wantarray' returns is related to the context that the original function was called in.c«rpi3wuRED SOFTRED SOFTGPL+ or ArtisticRED SOFTUnspecifiedhttps://metacpan.org/release/Context-PreservelinuxnoarchHG A큤A큤A큤c«YYYc«Yc«c«Y31347520b25cdbc52b5edaee1f40efb5180f530916753210a115f466578259982b0f6dba59e3660d04536035b7f9135fcda08d85aabe8eeca190870a32757a51239083df7747803c75d9864bbf8a634baf21e7a92efd1f0bc2a234d270995fdef94f1a0fee88a825965ecfe72fce57f0ddcc4a7cae428323ebfc6e69be9c2c83c2e286417ac12999c854610e0d727d6f9382606064faf7f19b0377579a451d5685fa339fc5094792e44cd97cdfbb290f648616b8cf7f9c3b90878033d90ca7bcrootrootrootrootrootrootrootrootrootrootrootrootrootrootrootrootrootrootperl-Context-Preserve-0.03-15.red80.src.rpmperl(Context::Preserve)perl-Context-Preserve@@@@@    perl(:MODULE_COMPAT_5.36.0)perl(Carp)perl(Exporter)perl(base)perl(strict)perl(warnings)rpmlib(CompressedFileNames)rpmlib(FileDigests)rpmlib(PayloadFilesHavePrefix)rpmlib(PayloadIsZstd)3.0.4-14.6.0-14.0-15.4.18-14.18.0c0b{@Alexandr Subbotin - 0.03-15Anton Fadeev - 0:0.03-1- Build for red80- Initial build 0.030.03-15.red80perl-Context-PreserveCONTRIBUTINGChangesREADMEperl-Context-PreserveLICENCEContext::Preserve.3pm.gzContextPreserve.pm/usr/share/doc//usr/share/doc/perl-Context-Preserve//usr/share/licenses//usr/share/licenses/perl-Context-Preserve//usr/share/man/man3//usr/share/perl5/vendor_perl//usr/share/perl5/vendor_perl/Context/-O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -mbranch-protection=standard -fasynchronous-unwind-tables -fstack-clash-protectioncpiozstd19noarch-redhat-linux-gnudirectoryASCII texttroff or preprocessor input, ASCII text (gzip compressed data, max compression, from Unix)Perl5 module source textPRRRRRutf-81d21c93e80679cbefb9decc829b739b04dd5a6bd7e5f8b40b6f45b760755fc3b15a59864d811f252dde5d99a386d7b4d0c0c82eef1143e47f8cf101ecb8252e0?0(/hܜ/02~ܬVG> =Fx`]ch.Z (;2גjc'Q4zR "5;P+"r& D*<\Au$b摁^|GAѽڏq\lfdҹgom^ Ѷ{ʱ.l|[n"$E;zRvBef@^Vt%")m:NlN䫳]:t(#Ӂ쮥#%zs,|I SZ  &.2(* V84`Vz}ۢ} d['G`!c Y ax!ٸ֗Y+  yFYHw@rlj42(f_5WR'D]-!H8H,\-U6J)g5jN,_2KI,DYbG\U=(Z8]׻pх46>y嶜FPYȏM+ _I-ԀHs<}d ;ɴPWiI$IUM$e [P{.BmkMdZh c 2 X@$Žǟ^_Λ QFoS򃖏-BG hӸY:{yQw +‚"7<~_]ߺKn+0oSiOq>8R–u~\2(ݯIՍX9u u5-tώƃeaBҮ֝|1ZƝtK«J5͢JK/ Y/kWc[}N[] S&&< wnL3?>rн!Ø#D %dZ ȦiJ$@+Qq%0$rAV SАBNJӽ޺_<>ҖBөua*!gsl#\]g)܊X+Ek ԽiH4,,,U`%.\Ԅzj]9h/wt+sFofaǁAuh{&{\ͱrW)_{+ڐ{2d\\ TZg:֐s#ioC)n7L[R|`nbJ“Gl m7Rq%^ږ$,*&`02jqƆ) _rj:529ocڠT%[yTiqeZ) ӥ CL(=IqdPq[*z ݫ٦eǿ|fiǤ!#0 Vt I0su}/-[|%8FdWy]kӣE!1OkySjXT-r%'YzR7] q1]H{ǹ0IDUh 3y! ܈v+1LVM]&|nj'0L/TyB}{''WFPc}iuR_fTX<9-Cm`2 ! Q (`l$v@=T~F{:P8ij ;l, 2#Eg: 2^'R?㴏9o*yKu|xΪe0B>0I9Hd-dF4\n-NK MEDE 'ڂ棿p.@$u,fppuK86emuM:]Y!o#*P.Mfi-}$~/Dferc0 C#"ZdϢ Zt_5n.D1JQH3Mi9 :+ꮟ57f \cV~5pxHH|r[-m]ȇ f O%94)LVG`?AStꤼӒît1+LxAeZ=G* )ʓ()U`t6AD M)m2ylzjW*o `{?u M%uo_7qyIHpd49}7z((=]Bz+W .Et9=y %g j*Ww)Xac8KexGKlptTES~ّX* D+ejSb 쇁+T:2jPW bgo nG xck NTM$)0^_ahިje4d,;"̯_rzne吃>7@BUqKcK˒CY]f{ńPr[?D R]|Ξ݅\ͯ";'FGO=W8?9fl#Ybo y'Y2q],i/ZaHJgHT0K>h/@%ztZ`NX 2=E0QaUH&d|BVs^ Q`ek`%q>_w(X,%lO ;*޾Pͷ+86Ze%?YWm.LZm}4 u6h#At %],n sxn8evM}hAoS.g8zF̗2OZWT|J-[ ,7:ej;DݵSh:-p= #/Djq "4!$ÜpX5wKaBi ̄ 5A,䰟ڃyfS@8=pʲOBs:!,1BtxH ~F>-[$'0֢ 24Z`™ͲxGTD ^G=z+SҺ%p (pI~E"[ㄪ/Rub$>Y# g~(#ʁ 1:Kr;}w._.ezpsz0,2ðnmh֍L\_kYWu]lqiKb|7#!_`grw]pĵwnոQrx{1:&?ݍ.+cw/K`nX X4ra|f|]u0noY,lx}7i}7gs6Cxzw]1Ym7Ac BЀ$2ؕ$I" qd`$ʌ" E%)Zն Ij&9c~Y &2 PM.G*T xGpZp1rI,E}Չ?WBcjdu,2V W0IST gM:Ef/Y\s8saif>LV-eQgjab4R 0U ^ !daL nR$?$'auƶLT`D'a`V pj\(-d o¡kB@r= 0{WŊ6rH]a)͵8" EnanjUQn=g/UC`x@5)b*BlEA>8Br#'U{InAHƇLUv;{& {!e]TgTd@đw >fJ4TF68& |}" 8^.Vc/np4R |?p99AF$ו",iީ_d׿9*dzZcźDbse[DvǺCSYC xˢئ5I쀄4Dחأ$<\w\N4l ߯i@/99A7oOK_Q:Q;3=]5n@:0*;) 49;^z<D n4-y=| 0gCD'F4b׋Ii?!Ց|ś[<ҥ 6(쮢}U\cWz>5/q{FySuk^P3Վ\3Vp!}_*{fto֝3|AU(LYC(y#NleQygf+y4>SP`5e(0 mX}$\)"ܮ[%4 `cpK3>-TzjAqOμNХ*T幐*֛%'s*)avu`5]tU28{YFf t!,!:>,n+ .δ +8] t(vh_9̱^2G-uyJ{2S։e;*tq:>$\G- ʊiLa¯u뵛pTcNϦ0רR4y}>&b<Kt`2oٝ=:`29 3&|{Mm24q|ssaid Usenetvaloronjorsiteftp.uu.ae rganizren-sfteparaprssrrs ,toge(oirc,5r p y(y )a adveew6ptapuorf ms dCerlbnkto8endorsee rior 9.ACKAGD IE7aab3/.3pm.gzYms6_Hl'7='v*vHN&$PbͷUM~$EvNbv0Y"L4qLFha6;udZ*e~.3+z@,F3C;21nR`cnbԥtхs%.>VTI" "˂c6 Lx4+Fd\)b%WTjGY,¦D B)kfvg4 Nbq*k\91UΩgp ٳ# qu~h>?:.<_-li9g&/UQ_@8~ΗV9_)>\t~r9<*g0~}A ~o QKK~ͷvx\<& @fk9˰d B(Di0i+_rc; p\o0`Г(FxĦk9]J_Uk1#9k|A;?xtiTd^ >ѥL`tl/Iˬg.r8UΌ6r>i_ r:;Ww6 ;p?]^ ǃuP%T1w7XySFcMN+ 3YԪgJ! U('Fa*PJv?p8+-Pi-n#v3\?V#HS{/{Sr|˫Mg{ A(\#QޗCv/GnYk<\l7=3}#A|*]!+BaQ{j{fE羶x Yl N%cmݹQٴ^ hDz3T}avb4rR^9}lfx u?Zd:9D9uy6c>f|sH&5Z[D3c2*<˧^̈́;Gh#=Msei&Cqyۣg(j3jׁ z{jF nmǢ:gӏpCY&5PA߶YۭXp+}VTUIg@㥥 :Y\8ȔEӇ*0|XLh pIo.uJޭljBn9c' *6!v4'WD ٶ#piIM;\oZ"p  V닫Ѧgn9ʽԪ9)۷Wʾ=2=)v Ngo4KzmUon~@,= 4|wqMoAЃSl,4Kh\r]mF_5 GL+Aꢆ @?J/zʫK9'=K&s%KO,y!`5BH ?-=TR]85/v_913cf2/pm; # git: v-4-g9a6a9b9 #TRACT:;nsCarp; 'Exer'; @ORT = qw(e_)$V' (&@) { y $ft;%args@_re${}; roak 'ne """"' ||(!y)->()}return@ultored$$$}qIJ1 1s{ҐTG2 $ B( Fe$)d8:إ!pe{ ?ס=8k!;uD#c8b"F)*6L`* .M-V7}ٍ3p1<֯4cWtٗN-2 rV9"Hqt"ȨX8AtE_`ɢ { Fİp/ qɮGpP|tF>B_84^_T) ̮vz"'%:R8G *q%MCӵYOP-QwԘeuViBR1`4{eK!je9@$<\tB s*M7Zbm~$bnfLE+/2Zj|*`7Ce(;6%2 .s!yT\z3-1TOʰCnFiOIKbs+ml3irVk/Enx?m_Oz!LD4`K͆^$[x='uqUUV/Ŏ͟g4EtQEc0~P "5U:wB2ZamzƩTV$}%nCC.$YX14P e )dAHp9fZS_zy "7fcQ2)\bmijqw1: ә]\JB--/&HɅ3)÷"U  䶭TIrfHd4zF6z[OHC"GP^#ܹC'Vş=4-X$jm[Ʃv&]Ma pB𾬵0|b:|9F NLfP*F bPmP?ۊѵO-D;lŜl3GyeH99?h-DZoA Q~RhA# D|vX{`{LXet|M}kDF;̴a((kfA=S9ݷA44R}#F} ۜ;vkY`-.]l/ R[iz&uиW+QR^BLYv%?`e j>*ѳ'o58A$[|Ҕ2M Z]1XLQ%V?W6Ot8ֆJ{%Ϫ% A5rT\ }"NI iE r6u= i9sAK8lj^IP3g]@2ZGBwZVj+bEMKD#.*(?TX>bp ̚lPJ &*qe]8uZqt,a{cH)zEG$<iL3:DeN4X(9AP|YUNy/k]cgd] ͣSC!wr8\:Jn Su!i[\E~;