Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Re: Split string to arrayref? SQL::Abstract

by ww (Bishop)
on Nov 02, 2011 at 12:02 UTC ( #935366=note: print w/ replies, xml ) Need Help??


in reply to Split string to arrayref? SQL::Abstract

moritz is briefer (and direct creation of the ref is likely better) but this is tut form:

#!/usr/bin/perl use Modern::Perl; # 935351 # how can I split a string (on bar character) into an array ref for us +e in SQL::Abstract? my $string = 'foo|bar|baz|bat'; my @array = split /\|/, $string; # 1 my $arrayref = \@array; # 2 spititout($arrayref); # 3 sub spititout { my $array_ref_in_sub = shift; # 4 my @workingarray = @$array_ref_in_sub; # 5 for $_(@workingarray) { # 6 say $_; } }

Notes:

  1. break the string on VBARs and stuff the resulting elements to @array
  2. create a ref to @array
  3. call the sub
  4. get the ref to the original $array back from the arrayref passed to the sub
  5. dereference; put the data referenced (loosely, "pointed to") in the reference into an array with which we can work
  6. demonstrate that $array_ref_in_sub has what OP wants for SQL::Abstract


Comment on Re: Split string to arrayref? SQL::Abstract
Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://935366]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (9)
As of 2014-08-01 10:00 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Who would be the most fun to work for?















    Results (0 votes), past polls