Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

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
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>.

    --Chris

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

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (2)
As of 2014-10-25 08:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (142 votes), past polls