howdy, y'all...

was working with some of the great tutorials here at the monestary and in doing so, begin playing with the -s switch...

while it is true that Getopt::Std or Getopt::Long are more flexible (and don't seem to have the same hangups with strict), i'm still interested in finding out whether the -s switch can work with strict...

below is posted a simple piece of code, just for the purposes of testing... if i was feeling compelled to use the -s switch, i found the following worked, meaning produced the expected output: 

#!/usr/local/bin/perl -s

use strict;

my ($var) = "This is the line that should be changed.";
my (@old) = split(/ /,$var);

no strict;

   if ($z){
        @old = map { tr/aeiou/AEIOU/; $_;} @old;   #imagine many value
+s here
   } else {
        @old = "\nBlah-Blah\n";
   }

use strict;

#imagine more code here

print "@old\n";

[download]

now if i run the script as myprog.pl -zit will give the expected result, and without the switch, the else result...
without the no strict; use strict wrap, it tells me i need to predefine $z... but if i predefine it, the -s switch fails...

my question: assuming i have to use the -s switch, and that my code will be more that 10 lines long and i want to use strict,
is there another way to use the -s switch and strict together?

Thanks in advance...

magnus

In reply to -s and strict by magnus

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.