Help for this page
my $blah = 'foo.Q'; print qq{gcc $blah -o @{[ substr $blah, 0, -2 ]} and many more }; __END__ gcc foo.Q -o foo and many more
#!/usr/bin/perl -- #~ 2012-10-11-01:58:20PDT by Anonymous Monk ... __END__