sub myrun{
...}
my $run = $condition ? 'system' : 'myrun';