perl-Lexical-Persistence-1.023-6.1>t  DH`pX+鸋/=„p B Df\TpaS#4)D*>XH\#Xdb1 a۪+&UNf| O ࢲ(ϝ;V¿}V!\&~@1*F"m 'BpZ#AƜ1SCmUoAe?Ԝ۴o!wOCn8q[!m ~_T,*&U'[ 6/:8?(d! % ]X\dh{  4  F  X  |  E  P t    Tl( 8(98:FG$ HH Il XxY\ ] ^=bctdeflu v(w x yzCperl-Lexical-Persistence1.0236.1Persistent lexical variable values for arbitrary calls.Lexical::Persistence does a few things, all related. Note that all the behaviors listed here are the defaults. Subclasses can override nearly every aspect of Lexical::Persistence's behavior. Lexical::Persistence lets your code access persistent data through lexical variables. This example prints "some value" because the value of $x persists in the $lp object between setter() and getter(). use Lexical::Persistence; my $lp = Lexical::Persistence->new(); $lp->call(\&setter); $lp->call(\&getter); sub setter { my $x = "some value" } sub getter { print my $x, "\n" } Lexicals with leading underscores are not persistent. By default, Lexical::Persistence supports accessing data from multiple sources through the use of variable prefixes. The set_context() member sets each data source. It takes a prefix name and a hash of key/value pairs. By default, the keys must have sigils representing their variable types. use Lexical::Persistence; my $lp = Lexical::Persistence->new(); $lp->set_context( pi => { '$member' => 3.141 } ); $lp->set_context( e => { '@member' => [ 2, '.', 7, 1, 8 ] } ); $lp->set_context( animal => { '%member' => { cat => "meow", dog => "woof" } } ); $lp->call(\&display); sub display { my ($pi_member, @e_member, %animal_member); print "pi = $pi_member\n"; print "e = @e_member\n"; while (my ($animal, $sound) = each %animal_member) { print "The $animal goes... $sound!\n"; } } And the corresponding output: pi = 3.141 e = 2 . 7 1 8 The cat goes... meow! The dog goes... woof! By default, call() takes a single subroutine reference and an optional list of named arguments. The arguments will be passed directly to the called subroutine, but Lexical::Persistence also makes the values available from the "arg" prefix. use Lexical::Persistence; my %animals = ( snake => "hiss", plane => "I'm Cartesian", ); my $lp = Lexical::Persistence->new(); while (my ($animal, $sound) = each %animals) { $lp->call(\&display, animal => $animal, sound => $sound); } sub display { my ($arg_animal, $arg_sound); print "The $arg_animal goes... $arg_sound!\n"; } And the corresponding output: The plane goes... I'm Cartesian! The snake goes... hiss! Sometimes you want to call functions normally. The wrap() method will wrap your function in a small thunk that does the call() for you, returning a coderef. use Lexical::Persistence; my $lp = Lexical::Persistence->new(); my $thunk = $lp->wrap(\&display); $thunk->(animal => "squirrel", sound => "nuts"); sub display { my ($arg_animal, $arg_sound); print "The $arg_animal goes... $arg_sound!\n"; } And the corresponding output: The squirrel goes... nuts! Prefixes are the characters leading up to the first underscore in a lexical variable's name. However, there's also a default context named underscore. It's literally "_" because the underscore is not legal in a context name by default. Variables without prefixes, or with prefixes that have not been previously defined by set_context(), are stored in that context. The get_context() member returns a hash for a named context. This allows your code to manipulate the values within a persistent context. use Lexical::Persistence; my $lp = Lexical::Persistence->new(); $lp->set_context( _ => { '@mind' => [qw(My mind is going. I can feel it.)] } ); while (1) { $lp->call(\&display); my $mind = $lp->get_context("_")->{'@mind'}; splice @$mind, rand(@$mind), 1; last unless @$mind; } sub display { my @mind; print "@mind\n"; } Displays something like: My mind is going. I can feel it. My is going. I can feel it. My is going. I feel it. My going. I feel it. My going. I feel My I feel My I My It's possible to create multiple Lexical::Persistence objects, each with a unique state. use Lexical::Persistence; my $lp_1 = Lexical::Persistence->new(); $lp_1->set_context( _ => { '$foo' => "context 1's foo" } ); my $lp_2 = Lexical::Persistence->new(); $lp_2->set_context( _ => { '$foo' => "the foo in context 2" } ); $lp_1->call(\&display); $lp_2->call(\&display); sub display { print my $foo, "\n"; } Gets you this output: context 1's foo the foo in context 2 You can also compile and execute perl code contained in plain strings in a a lexical environment that already contains the persisted variables. use Lexical::Persistence; my $lp = Lexical::Persistence->new(); $lp->do( 'my $message = "Hello, world" ); $lp->do( 'print "$message\n"' ); Which gives the output: Hello, world If you come up with other fun uses, let us know.X+build35openSUSE Leap 42.3openSUSEArtistic-1.0 or GPL-1.0+http://bugs.opensuse.orgDevelopment/Libraries/Perlhttp://search.cpan.org/dist/Lexical-Persistence/linuxnoarch@@G;G3FA$AA큤$X+R X+X+R R R R X+a9e2d7e96610ba083be71379ba967a6327fd599432064547903c1a8270d567e5413a0dea6f12d0f2b84442a9597348e3d4454b82edd1d496017f13d563d5aba57bff417b00a87e0677db6a55dc513895c996a39fdde635de9a86f76fbe3ecc4drootrootrootrootrootrootrootrootrootrootrootrootrootrootrootrootrootrootperl-Lexical-Persistence-1.023-6.1.src.rpmperl(Lexical::Persistence)perl-Lexical-Persistence    perl(:MODULE_COMPAT_5.18.2)perl(Devel::LexAlias)perl(PadWalker)rpmlib(CompressedFileNames)rpmlib(PayloadFilesHavePrefix)rpmlib(PayloadIsLzma)0.051.963.0.4-14.0-14.4.6-14.11.2R;PPy@LKFcoolo@suse.comcoolo@suse.comcoolo@novell.compascal.bleser@opensuse.org- updated to 1.023, they forgot to update their changelog- use perl_requires macro- remove /var/adm/perl-modules- initial package (1.020)build35 1489775584 1.0201.023-6.1LexicalPersistence.pmx86_64-linux-thread-multiperl-Lexical-PersistenceCHANGESLICENSEREADMEREADME.mkdnLexical::Persistence.3pm.gz/usr/lib/perl5/vendor_perl/5.18.2//usr/lib/perl5/vendor_perl/5.18.2/Lexical//usr/share/doc/packages//usr/share/doc/packages/perl-Lexical-Persistence//usr/share/man/man3/-fmessage-length=0 -grecord-gcc-switches -O2 -Wall -D_FORTIFY_SOURCE=2 -fstack-protector -funwind-tables -fasynchronous-unwind-tables -gobs://build.opensuse.org/openSUSE:Leap:42.3/standard/a44ed45a4d7476bdcc746de19507daf6-perl-Lexical-Persistencecpiolzma5noarch-suse-linuxdirectoryPerl5 module source textASCII textPascal source, ASCII texttroff or preprocessor input, ASCII text (gzip compressed data, max compression, from Unix)P8*bjjFS?`] crt:bLL' ͂񯵫b»44&bvhd03ɝ&ޛ:]=lJSNhۨ:y*HkzbW˻:u>Jr8a#SqT֪T5r'ܖD[0!1MCex3_KCjZcaݕdw_PvzqzW{ o+,T}Xnso&XnTfq{©^nˠX wrH4w*&(QC)PFn&H~[ZV'L2~^(4Rww!xGH.fc?c(aY{=g&l0c(Fi7Kx sD::u{`bV WUUz;l_֢-3І|qKT &-Ypg0n _rlr 彰Bq5l<ܸSV3oӯ_auSa3RE$$߲J I!{!RH]Ӡ%ME]bsLGӤeawx~R_9V5 CZHLă- 0"3VDi薊v<=s\=`jQ}DŽHž3qzڽ| qp-jh} +jrC;=/29SLGDE<9?ɢ1x, V'+͔"ҥ1V̼[ QH:=׫dM>b阐ďvZ +qa`;y^ <.SA| 1px\v ̫F\zlRZ8ǹ2yh*oqDa^H_>;k1p{*Oui UDf=^qt"z[yd3VN29uR~/J"L 2%cNdj " q!}R`R2x޽S_O1aA*%r>ĸ%{g} K)EZOkEpr_-{ IbM ܵn,bZ0 %_ 'N}%fW-pWTZPPa֡0ӳ\,^W}gM&׍g$֫ė~54)ś _Vv.xv!zε">pVn*gk%ΫHMbpE"ݔL%JjE׊Y W~pEUQb2ĴP9ߺm>:fF9+C-c_ǡx"l⁑ksȬ'}P+7Vac$]A!2`eZa|(p}Řku4CcPsT" >[pv5$:>ڵ-%Q4"~0}ٸ|"lv4?\X4άdJ+?VCU+E"쮅$]pZhO 7bߥf3hUqNh:Ȏ}Q(~+2J>f*5k.k"&\ 5$Gkh<=rL;z x!˭wk2dZkHY|) CR;lǮ?̪AզBJ3BrbN)JW}5(^n & Oȥ "T=O]݌UT[mP")Ff~\5RSP/gG3i6=kQgD1DRǛ\ ǣA)\ ,TǗ.P/c:Z5?z7\7_!G{R'i_ ^hWX{ "ݣqn&}u5"Z0Һہ՝D5Mh1sh־Mse'4o07{k0 j)$fSZ`]xר|5 神ZL\n&(P6U;W9`x nox5вCŻP].݅?K񫫃 ?Wo_x f;Mda\VS#G,ܧOymY CԿ@/ A _L&,BOfU$FW" ;S$|9Lk,\%MYgKOqf#ZgsE]1J,8<|q"Yciq} (Rt'fv.1*ఎ 0e) eKC(,* cmK2\GήRĺZv~~J_'&{J`NUu/qUVlo-Ĝ^^JڅdvV=V9˵n'V{.t|Cǫ*R[4ptsY O}3X{ ; c`1kC) }~Zq;i}קH3W@_^?C$03x7Wwe]{9=GFP͆9ʧƨ×3Iۗ{<:4ZͲ|Rak>wf͌WPKny?S@rn'zd:%J^6[Og,_YӋU8UH*0Q| sܲjY]i9]6'Z~=4Nxܿ$QB{H?D{&Gaũdg7kebMѰkaR dGALpDU $-F%#_ RK4hK8L'P*ϕUnP G'Ճ4Y+Rl EA gWxw#Y_r@Ovh5M&,A oo2gαL`>\#E┧=E,$ 2>Gv%s|l)xn&ŽFY:k%m?8*ǍgiM.c ΂#8#,U,w῝)6;0!16ORX6x~W=U X\C\66A+;. e`p jZ u1/"JUH^NCK_Q`t*P/z5dDݶhLnt-`҆żv`F}fn冋O 1CӧrуxfMpQ"G{y.QмtIC+Dz Bo|&#INWa>ujIl.T %O$5޺IB7!B) V,$5$ ybѽKoNOY" dY&JCag%%J'w\t. ڙtWϷv胻cZA>B'zUs\Ȉ|gv50A',YN/~F@zLx*S S_ KŒB]ܟα&y-l NX GS$s,922{zTh+ȸZuWtfhrDŘg)8İ%L.f;WAx7? [{$ho(*2.+my8)*^J TB3|H&Ck= QM/<ƪ) wi:mvPk#^@""F1͆l 9p*_35ʔٛAJLR .mtZSh` Ų&y;"1(2We@w?^nv/>&|c{fupI ৠ=$-xOm ]'xA(S[%.F? ]lJjQﲆ-4>; Ӄξ<uøTY6!8*8y( 6>:M%GGV0A,J`/][@.(SU MJFcUC@ y.FŮtMSe&wCgJՏˠ#MާLiA}gU€Y]7v\JP奤n֠,O6ED$WBe2` qXӷ܋ L|w_P(8mG.ZfJiVN d4Ő_ bdI9ozD SqFuV` jc,]ib;g^9c !(n5^Vz%=U#L;_Etͨ+bJ=ťv%WY[ cCgugߡrV;2 }r O U(zjx4xm !8!jq !bIRD,d: mIp#lEyʱ7REI*8F\*0Cb|.AkR!iJ ? k"[/e4n"2 ⇣d;guN@QlpCF# 'qR +t>[RbeR ].&>&#K q.bA=(Y;.\s+BȓWPx 5puCog`uC)$8+$U.5?~X(Kl]y<[A[`dav*4Fh'PeEI}atHBY:04䅟= z+,JБof1ZvM8{UMѺኇvlM;5 =K238Œv s/ 9:b* XeО*w Uzq kzyvN\0PM_*T$5j8DhK!)0ħa 2yM$goDw=ekʧQcjN`2ٶD/"kHfD8pBRPYk .Dh~{I~$ɑnN$J/)L+/ɯVBeoj \9"VBFEk3~ F N3 񶜻}+W0z =)*w!·d 7lXAzÜIS):8I̸1R%'ߙ7|؁.J-hƬFd0np/7+%;dǠρ7{h*+?洋h*#k݃WmrJQ*|n.[j",Ɗ9;6Io/ʟqƩNWj{m1 N@3LlW_~\SĖ.J":荬,=Zux1fŇFH8z41/Q[[h9&xUEñQ]}M&hIQ6Pt_Iz :RZ#n=evE1JV#IV/A[AyvqkihU ?lU?c:'#mqٮT6ُlDї<B|:|3F.#h䉡2v4;՛ZAu9)\zΦDA8=эYA@vcx<3Іd d3A&Iuk 4_ΣIQ=/])uo\'[qt['Kf˭4hwX=tgӐR/_]ޯ{h?sFR$-н8>`a~\07!Tn7OvH@= (&^ "NϏ:\98YsyM9o7%¾1lK_:D'i3!CY"/@!ӛwEfT@Mpd&򧔎TƱԆF*^sq}G 'AeS{aӡkP:#Jeg~녺NL^^ 4!HIr@냶n& ,klDi&doc\*޺.-,ZFF+֥uv=D9i ܪ#fujMRmYa@{&M|._" ZۦW4LYKI!s|{Je" "Q( m_րmRkĂ}vzr{n ti,wcgKF^WѴqt.zuV|25"aI**Sj!{+tUATTn߮[ żr>^:y'|dtA(/~DuQldDko@ڌQtoq~ Q~N.ڇinK$ʫ,<Ƌȁ u I;JG|kR5pl@g88]QZNj@6WWya`&a\!yYh kS+uuGv~Io#BE)=3-3BA1.I 1jc(;L' :,w#Ehxi ܦ/ga!|(r/4Y- E4 ]kx mB%mSkJ?U w3-skPm[0k}o^{-'M pJ%Wbʾ9 0ng*ǫa#P; ՝9?e[魍Y~N3 5IJmީ_V[U̽ bf"6Dx-;Wޕ3} $K{&i Sow-R`Te"Fsj sos,EYɕASEj 0<ϑ{CDTeY-hJi1FxTcOuArg;w fGb0%qkN"@Vn}<3΍8HS!N]&9JV-+<9O2 αc_E6ݜx ,7B:+bCs\`}1,O+",ϏL Fm]|Q6ۓ+lM-Vg||VAvS[ߦIa-'>tAܜ MpIrN k)F:#%[Tְ)elyּ&f&fy\tV6?1#HJ_ 30v󮥕SA.1B8'SK\5l _a$:W\8wht;Q$N4PAɒC2 : T\y[+&.alb^hE ؀6} a?dPo`}`, I Ozv\ W_Bq`c@xK{˗榽|Y#OONp0I׋ʇb&5KJX B ֞~ %gRk)wBVN֤G*yAKgzmr9NI2bC܈˵H֬-L/tvFd7|mD/b"ZշbEA!oۅ={l爥;#&HZ E=F͛zAQB{5)>@*q%ŧ5B-4<ۑ` 9q6=՝iBR#Fx#V޼CPLch4Pj#1KhCu8l,B?>Hr^pSS,uzRýr zqBI1Јg[^/߃0T^ˌ}\||"`qL(|r GJqcOnѿ]O E1sR*0TZܥd Iܼ锓{K]YSDŴG#=]chd082g&N֩LUVT}=CFT*3{r#OP d?UfuOY8b/n=LZgTiٰͥQw |}08v0WUU^!摾¥rsc >&K羟`*+9aCqIWm*kk l93C8"=du29Ֆn2cvʕ 9*@\+h|7F;8q>On8hKf+ڠP`?2ub{چ(FwaW/uzcy0s7UQ2467'jP7 `RŵtyT6-=ۥVM^n3\ Tq`b&/w1~Jv B&R3t^f_؀Oe˹@6M*|Yb 6Xt4:ŨT+kؿp9K؃ϛ1FFCj};@n'ٽ2=vȿV 1Gu E<7c`L$-at*⃀ɎR}Qj 3IM4 f1xB)\ t=Vr> jB/tT-_ /S]ݼ#_AW3U },Ž(9}L{`v._DiRQh 0]ńQ_hN%9K!M|yon-S0T9 PWQԃj6,03dĨpdmv{U/UPک%ᙙ=:q_d]&4槥 ?-nEqjBKj` G|&ק\.Ա^nUB%fՏa Q] -[~~_0_0yǚm"ҧK. E) Q_qZ;-3TO^,PCu(w6'<0=M5PK%5y02`dӡڣU],(3eh=u=tp'?u,\EF AFTiB%Ax'X+C WapFT较[V1qkr5 n:[_=5p2RreT `ڰ#F/et6dBӵ~9e6R=u+V!5W7lJ!ysԜ<5h޲, '_Us?DI{}Q@QlAߞDçOD"W8i`E+fhy_ }6e({AɍIGa1yC;5y~n<-n3@ Jf{хI PW+Pֱ( ,#t!*v/2Ϳi&_.T+B4L*C b\@*P*i)>DX1c@ ׏+:Bthʨ&=~f4vnaP4glB)[h't9}:%VGt..;MBĞ÷d+F$]5u%2F*/c dY&<^-ob 瘠w{ @MD_ZKhFakbvl3x;2# h: ߃!gr(ԦdO[{F {A1L4fx]sU f7Hy⒂ɑsS)a4JI'6@.J0FbF\%"i>kU1}l8D ;pCt%δ`QjE*ttKDA؋3$HN*/V"B{9;:ۣ(2h`:ʒUOBt#=hMpߧQ |S(5IUG3I8ȗVp#HR+g԰7+Z6`J˥ K2l\Ѝ YxJzUr 9C*Zv5vԃzZ0p.4km-~F 2j-NSQغ+&ؿrF?M?r6SвiT5zRN; AN0B^i0C g}PL`aby92/$o\5Sإx0Gqɾ0t^2:Q iU~֙>:v#x:voלS(mDQ#2k`9< 󛰮_î3*Ւ5gT?DpJn>u%9Po8E,, ˥ G*Rn9O'~|t|͎59\d[#גܣ밝Np |b JmgI^ )jއ Nګy[*-Bs=,x2<-[V`&5 "] M-,s7!1Xx07[or|s^<֜e`,@Lvm3jN@$,te#>JЊd~}[I+N՘TlVUBaߝq-O$>N&_ۻ ؜zzڦȏ2L6,c(yd,Av p9fw3؎UZ`&q`<*w48E"- -E |DoڃۈjZGSC֙'ޘ_3Z &4IJ]`TjN!w Vt1;o]]qMγzOc}"^':DA CQgm휄rI#b/LBw4.qjWS%T;5KyG9!T BIm6#I7n Vy%^yUƶ%%'ιjm17>!EjΈf^&f3 h#Lr=41ט6╷*Xu@Z,x}O0u:3|O3T9Cb\雊}hlY\ &Y}n~1a. K,BR1H$@.К\LՌ-jJ~*Q6 _m#yB_c8A!b}O]6?QߣE'״lM'l{L/~zK6;wed iT6Āl}h ²hB>keY1*5fE%XuJ6>{w sJ1]hTfA'rHR~P6AɁ3vd.v0Y5?<}/` RH< z)lNTm&:iTj ;noZb86Oy>dVpXjmLVփ]u7a&vvMܕViށо!E IŸA\OQeDJQ%_ j W}{l?vcڜx n+E+ %"tK⛒ >12XK젶VZUHko1awfۇؓ< $W)3oF&w_d$Lx vou%2e+&D EER|}~eq 1Ix*C Qg ݹ| e]A"[o;tek ]eՑ4"@xVV|w|wB]G{  װmT,.U&6r,S%< 7A!ӉF.Ⱦ=.M+ȁM1ƍ}|~M86TM_7q[SHp \l-%A†GJQ t(Jƣ'XUӆ -WayRUl\ӡ7xJElfwX/LjA@tvl;{.=bAh#--,x (^|U.Yfɋ"dn qy޵F@8߻A/d}ulc~(-׍H`6 2f+kGI;3HI=rz| o|GN|N  FLo/q%i"dB1ۍ"7(L(6uy?Y7QMzٱDaܽoFN3xEU`mԁʐi%p"Oh}-P s@dխ0 "C.E%\E+MCB{/+᤼td^ch0{&M;Ƞ;6hQ!E;(Υ*tKZYcRi{xm\t LBsV`<)Xl#:#v&C QјKqj/=h6*ƩY{rA=(@VЭ. DF/~JÕa,ػFƏR6liDF9w 8^އF$ɱD19Q2t<.\z sbFȠhuAt N.;s,w2]"Sd!?)4>H;(dQٰ2>vxGqK@lgn->AeavQp(|s+F{o6| 30 گ,珒cb΁ ߵ*U> ȼft1^ Ys>pܱ#R^ ~@C,!PLftU\_pnʙgay2&*5+EH\(B_QTnS'x3ɫZr8©2'~9ч x+07L\jC1çJy\]P,RqJ lz)OaMֱxᑿ൧ȿ}<{ɗ.ѓK@)R`/؀8Y;1^{+AZna T-Ս`A HwjCΩU=h|KS*@F" *r4I:QgOo׍7`N6gZPA_1Z~ǚEY3x+RG?j۴"<)eYz߄(Wd*-8|!hи ^M+9, ۫cN[ZF3>]s9A^ AFHpX-`?pf:S(ȝjĶ5}*+RJjA¨~a$/\BwqmA5.ͬQ46nvg2ኯMvr~׮ z 8ď!'",՘G_Wz@qC?")UL'+NE¤v 9+_D늚c"$e)ǿPVؼ a|jUhz>*4PKaOoa!c}HADA