note
Athanasius
<p>For the problem <i>as given</i>, the following simple approach may be useful:</p>
<code>
#! perl
use strict;
use warnings;
my @array = ('Mastering linux is a steep learning curve',
'Using Windows can be frustrating',
'Plan 9 is rarely seen');
print /linux/ ? "This is linux VM\n" :
/Windows/ ? "This is a Windows VM\n" :
"I have no idea what it is\n" for @array;
</code>
<p>Output:</p>
<code>
This is linux VM
This is a Windows VM
I have no idea what it is
</code>
<p>See [doc://perlop#Conditional-Operator]. But note that this approach is not generally scalable for dealing with more complex conditions. And see the thread [id://975572] for the syntactic pitfalls.</p>
<p>Hope that helps,</p>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-968231">
<p>Athanasius <font color=#008000><°(((><</font> <i>contra mundum</i></p>
</div></div>
989949
989949