Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re^3: raffle_tickets_generator

by GotToBTru (Prior)
on Dec 04, 2015 at 14:01 UTC ( [id://1149384]=note: print w/replies, xml ) Need Help??


in reply to Re^2: raffle_tickets_generator
in thread raffle_tickets_generator

Good reference that talks about paragraph mode.

use strict; use warnings; my ($first,$second,$third); { local $/ = ''; ($first, $second, $third) = <DATA>; } printf "First: %s", $first; printf "Second: %s", $second; printf "Third: %s", $third; __DATA__ this will go into the variable called first second here tail end charlie
Dum Spiro Spero

Replies are listed 'Best First'.
Re^4: raffle_tickets_generator
by QuillMeantTen (Friar) on Dec 05, 2015 at 10:18 UTC

    Just to be sure I get it, when you localise $/ as '' perl will see an empty line as the record separator? even if said empty line is actually just one '\n' character.

    I understand that making $/ equal '\n' you would have ended up with

    $first = "this will"; $second="go into the variable"; $third = "called first";

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (6)
As of 2024-03-28 08:37 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found