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

Re^7: Useless use of a constant (ict) in void context

by mje (Curate)
on Nov 15, 2013 at 14:26 UTC ( #1062754=note: print w/ replies, xml ) Need Help??

in reply to Re^6: Useless use of a constant (ict) in void context
in thread Useless use of a constant (ict) in void context

That is a possibility but when I view it with hexl-mode in emacs with the original line commented out and my retyped first line I don't see the difference:

00000000: 2370 6163 6b61 6765 2054 6573 743a 3a4e #package Test::N 00000010: 6f57 6172 6e69 6e67 733b 0a70 6163 6b61 oWarnings;.packa 00000020: 6765 2054 6573 743a 3a4e 6f57 6172 6e69 ge Test::NoWarni 00000030: 6e67 733b 0a0a 7573 6520 352e 3030 363b ngs;..use 5.006; 00000040: 0a75 7365 2073 7472 6963 743b 0a75 7365 .use strict;.use 00000050: 2077 6172 6e69 6e67 733b 0a75 7365 2043 warnings;.use C 00000060: 6172 7020 2020 2020 2020 2020 2020 2020 arp

Comment on Re^7: Useless use of a constant (ict) in void context
Download Code
Replies are listed 'Best First'.
Re^8: Useless use of a constant (ict) in void context
by taint (Chaplain) on Nov 15, 2013 at 14:53 UTC

    Yea, I dunno. If it were me, and I suspected some such thing. I'd run it through some sort of filter; SED,AWK, or such. That'll strip (filter) out anything but "normal" alphanumeric (plain text) text. I'd have added Perl itself to that list. But given your current problems, that might not be as "foolproof". I've got one I whipped up years ago that'd work for you. But it'll only work on a *NIX box. You happen to have one of those handy?

    On an aside. I used to embed the BEL character strategically in the comment file in all my .zip files. It was a blast. It'd play a little ditty every time you opened (extracted) the file. It scared the $#it out of Windows users -- others too, for that matter. Because you can't see them -- not that anyone would even expect them to be there. I can be so evil, sometimes <maniacal laugh>.


    #!/usr/bin/perl -Tw
    use Perl::Always or die;
    my $perl_version = (5.12.5);
    print $perl_version;

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (12)
As of 2015-11-25 20:51 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (690 votes), past polls