in reply to Re^3: Handling the output of a system command -- how to best manage?
in thread Handling the output of a system command -- how to best manage?

Greetings, and thank you for taking the time to help me on this.
EUREKA!
I maintained the previous revisions I made to your original reply. But,
removed the system() call -- retuning it to `ls -1b`;

It appears that the only issue I had with yours originally, was the single quote marks used in the HTML
formatting -- ' vs ".
For clarity (and anyone else that might be interested):

#!/usr/bin/perl print "Content-type: text/html\n\n"; use strict; use diagnostics -verbose; # Desperately seeking guidance :P use Modern::Perl; my @l = `ls -1b`; my $c = 0; # toggle for odd/even lines for (@l){ chomp; my $bg = $c ? "#eee" : "#ccc"; say qq| <p style="font-family:mono;background:$bg">$_</p> |; $c = 0 if $c++ == 1; } # use strict; with use Modern::Perl; is redundant # keeping use strict; and commenting use Modern Perl; # would require changing "say" to "print"

Thank you VERY much. The output is beautiful! :)

#!/usr/bin/perl -Tw
use perl::always;
my $perl_version = "5.12.4";
print $perl_version;
  • Comment on Re^4: Handling the output of a system command -- how to best manage?
  • Download Code

Replies are listed 'Best First'.
Re^5: Handling the output of a system command -- how to best manage?
by aaron_baugher (Curate) on Jun 21, 2012 at 15:22 UTC

    You're welcome! I use single quotes around HTML attribute values all the time, so I'm not sure why that would have caused a problem, but I'm glad you got it working.

    Aaron B.
    Available for small or large Perl jobs; see my home node.