{
     chomp $node;
     system ('wrunprb "*" "*" "*" $[node]');
}