Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re^13: [threads] Open a file in one thread and allow others to write to it

by ikegami (Pope)
on Nov 16, 2009 at 19:56 UTC ( #807550=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download



    Log In?
    Username:
    Password:

    What's my password?
    Create A New User
    Node Status?
    node history
    Node Type: note [id://807550]
    help
    Chatterbox?
    [Cosmic37]: now I have tried another blunder - can anyone explain why I am such a dunderhead?
    [Cosmic37]: if ( $line =~ /$mydt/ ) { print $line; }
    [Cosmic37]: I try to match successive date times stored in variable $mydt
    [Cosmic37]: I guess it is searching for the string "$mydt"
    [Corion]: Indeed cool, erix ;)
    [Cosmic37]: rather than the value of $mydt which is a date time strong such as 2016-01-01 12:30:56
    [Corion]: Cosmic37: No, but maybe $mydt doesn't contain what you think it does, or it contains characters that are special in a regular expression? Try if( $line =~ /\Q$mydt\E/) { ... for a literal match
    [Cosmic37]: I mean string grrr
    [Corion]: Maybe add an else branch in which you print what the values of $line and $mydt are?
    [Cosmic37]: ah thank you I will try

    How do I use this? | Other CB clients
    Other Users?
    Others lurking in the Monastery: (11)
    As of 2017-06-29 16:58 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?
      How many monitors do you use while coding?















      Results (673 votes). Check out past polls.