use X11::WMCtrl;

foreach my $wrksp (0..9){
      $wmctrl->switch($wrksp);