How do I concatenate arrays of aliases in Perl? -

-

how concatenate arrays of aliases in perl such resulting array contains aliases?

the solution came is:

my ($x, $y, $z) = 1 .. 3;  $a1 = sub {\@_}->($x);  $a2 = sub {\@_}->($y, $z);  $a3 = sub {\@_}->(@$a1, @$a2);  "@$a3";  # 1 2 3  $_++ $x, $y, $z;  "@$a3";  # 2 3 4

what not crazy create $a3 have unpack $a1 , $a2. short arrays isn't problem, data grows larger, means array operations on aliased arrays o(n), including traditionally o(1) operations push or unshift.

data::alias help, doesn't work latest versions of perl. array::refelem contains wrappers around api primitives av_store , av_push can used implement functionality. work:

sub alias_push (\@@) {     if (eval {require array::refelem}) {        &array::refelem::av_push($_[0], $_) @_[1 .. $#_]     } else {        $_[0] = sub {\@_}->(@{$_[0]}, @_[1 .. $#_])     } }

i interested know if there other ways. particularly if there other ways using core modules.

is 1 of cases might want linked list in perl? steve lembark has talk various cases people should reconsider rolling , unrolling arrays.

i'm curious why have things way though. not suspect odd; i'm curious problem.


Comments

Post a Comment

Popular posts from this blog

ASP.NET/SQL find the element ID and update database -

-
basically i've got update query runs when click submit button. i have asp:repeater in page layer inside this <asp:repeater id="dgbookings" runat="server" onitemdatabound="itemdb"> <itemtemplate> <div class="bookingscontent"> <div class="bookingdetails" id="<%# databinder.eval(container.dataitem, "booking_ref") %>"> <p class="infotext"><%# databinder.eval(container.dataitem, "adults") %> <asp:linkbutton onclick="editdetails" text="edit..." runat="server"></asp:linkbutton></p> <p class="infotext"><asp:linkbutton onclick="submitdetails" text="submit..." runat="server"></asp:linkbutton></p> </div> </div> </itemtemplate> <asp:repeater> and outputs ...
Read more

c++ - Compiling static TagLib 1.6.3 libraries for Windows -

-
i having super hard time compiling , using taglib 1.6.3 in qt project. i've tried can think of. taglib claims supported through cmake i'm not having luck. furthermore, i'm confused kinds of files need qt libs! i've built *.a files, *.lib, , *.dll. understand far... believe since i'm working in windows *.lib want. no matter do, end "undefined references" taglib functions try use when try compile qt project. have tried mingw32, msys, visual studio 2008, , cross-compiling windows on linux. turning nothing. what makes less sense me if compile same taglib source qt on mac (g++ think?) works fine! somewhere in windows compilation procedures have going wrong. have been smacking face on desk 30 (on , off) hours trying figure out. since qt uses mingw must compile taglib same compiler? if compile *.lib's visual studio not compatible? are *.a libraries usable in windows? (assuming mingw) i'm still trying handle on c++ stuff, after reading coun...
Read more

PostgreSQL 9.x - pg_read_binary_file & inserting files into bytea -

-
i have been looking everywhere (google, stackoverflow, etc.) documentation on how use postgresql pg_read_binary_file() function. the meaningful thing can find this page in official documentation. every time try use function error. for example: select pg_read_binary_file('/some/path/and/file.gif'); error: absolute path not allowed or select pg_read_binary_file('file.gif'); error: not stat file "file.gif": no such file or directory do need have file in specific directory postgres have access it? if directory? if matters, reason looking @ function because trying insert file database without doing crazy things . as stated @a_horse_with_no_name , @guedes solution ensure file being uploaded on server in pgdata directory. the postgres documentation state file location requirement. additionally, made symlink directory pgdata directory not disturb of postgres data structure. seems working , don't have of above...
Read more