list all files with local.codepage=cp1252

I've resolved using the scm command property list.

Here a perl script for a recursive search

use strict;
use File::Find;

my $scm_cmd="/opt/IBM/SDP/scmtools/eclipse/scm";
my $dir="/home/angelo/IBM/rationalsdp/workspace_prod/Hello_World_prj/";
my $url="https://clmweb:9443/ccm";
my $user="CLMADMIN";
my $pwd="xxxxxxxxx";
my $file_out="/home/angelo/get_local_codepage";

open FILE, ">$file_out" or die $!;

sub set_property{
print "analyzing $File::Find::name ............\n";
my $scm_out=`$scm_cmd property list -r $url -u $user -P $pwd $File::Find::name`;
my @row_out=split(/\n/,$scm_out);
for(@row_out){
if (substr($_,2,14) eq "local.codepage"){
print FILE $File::Find::name."\n";
print FILE $_."\n\n";
}
}
}
find(\&set_property,"$dir");

close FILE;