BOM results from the CPAN

Selenium-Remote-Driver

   ],
   "POST session/7af611e2-d625-45fb-ab16-33688ff0d0b5/log {\"type\":\"server\"}" : [
      "HTTP/1.1 200 OK\nCache-Control: no-cache\nCache-Control: no-cache\nConnection: close\nDate: Thu, 25 May 2017 00:46:02 GMT\nServer: Jetty(9.4.3.v20170317)\nContent-Length: 2854\nContent-Type: application/json;charset=utf-8\nExpires: Thu, 01 Jan...
   ],
   "POST session/cd31e9f2-66b7-40d9-9597-355bfcef1cce/element {\"using\":\"id\",\"value\":\"element_that_doesnt_exist\"}" : [
      "HTTP/1.1 500 Server Error\nCache-Control: no-cache\nCache-Control: no-cache\nConnection: close\nDate: Thu, 25 May 2017 00:45:54 GMT\nServer: Jetty(9.4.3.v20170317)\nContent-Length: 387348\nContent-Type: application/json;charset=utf-8\nExpires:...
   ],
   "POST session/cd31e9f2-66b7-40d9-9597-355bfcef1cce/execute {\"args\":[],\"script\":\"\\n          var links = window.document.links\\n          var length = links.length\\n          var results = new Array(length)\\n          while(length--) resul...
      "HTTP/1.1 200 OK\nCache-Control: no-cache\nCache-Control: no-cache\nConnection: close\nDate: Thu, 25 May 2017 00:45:56 GMT\nServer: Jetty(9.4.3.v20170317)\nContent-Length: 170\nContent-Type: application/json;charset=utf-8\nExpires: Thu, 01 Jan ...
   ],
   "POST session/7af611e2-d625-45fb-ab16-33688ff0d0b5/log {\"type\":\"driver\"}" : [

view all matches for this distribution

Sereal-Decoder

2 results

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

bind_match|5.003007||Viu
block_end|5.004000|5.004000|
block_gimme|5.004000|5.004000|u
blockhook_register|5.013003|5.013003|x
block_start|5.004000|5.004000|
BOM_UTF8|5.025005|5.003007|p
boolSV|5.004000|5.003007|p
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu
_byte_dump_string|5.025006||cViu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution

Sereal-Encoder

2 results

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

bind_match|5.003007||Viu
block_end|5.004000|5.004000|
block_gimme|5.004000|5.004000|u
blockhook_register|5.013003|5.013003|x
block_start|5.004000|5.004000|
BOM_UTF8|5.025005|5.003007|p
boolSV|5.004000|5.003007|p
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu
_byte_dump_string|5.025006||cViu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution

Sereal

1 match

view release on metacpan or search on metacpan

t/data/corpus view on Meta::CPAN

---
{WABlGg=>{WsxTgoCmJtWj=>79121,FWbXcNs=>'zY',HAZOai__Oeuny=>['uLkhvnHL'],yrOEvRUhB=>'leTRGn_ljQd',TMQr_DaY=>'Ex-Gn',ORpx=>'eYFA',leIuEzyBOpzvIJ=>0,OEXaHoI=>'',MJQeEJFLQxA=>0,_RuafJI=>'0.5'},LumhOl=>{JuoIjb=>'*/*',opsmlZOiaOUc=>0,JTQ=>'1',pHlNZJCtCAR=>...
---
{WABlGg=>{MoXkWVwtWtBwkq=>'ubUUbR;kdvxPt;bBcvCG;qncsPtdjUV;bIvhPoNcBr;NHVRfS'},LumhOl=>{JuoIjb=>'*/*',EfrbvjmcgPegFyg=>'eVyK, RBriKYc',LTDrnMNCqjHMKxM=>'Ex-or',WbGVflxHyB=>88,opsmlZOiaOUc=>2,HYpBCoBNdaqv=>'XINP/WQe',JTQ=>'1',pHlNZJCtCAR=>1,qpjfZFh=>'...
---
{WABlGg=>{MoXkWVwtWtBwkq=>'_aac;kdvxPt;bBcvCG;NHVRfS;ubUUbR;ugA;dKuoNX'},LumhOl=>{JuoIjb=>'XINP/WQe,*/*;x=0.0',EfrbvjmcgPegFyg=>'eVyK, RBriKYc',LTDrnMNCqjHMKxM=>'Ex-or,Ex;x=0.1',vjOR_XPbT=>'ifIYLG',WbGVflxHyB=>256,opsmlZOiaOUc=>9,HYpBCoBNdaqv=>'XINP/...
---
{WABlGg=>{WsxTgoCmJtWj=>79121,uJBWfGbhQli=>597,MoXkWVwtWtBwkq=>'y;_aac;ugA;dKuoNX;kdvxPt;NHVRfS;ubUUbR;bBcvCG',ShH=>{WABlGg=>'eQKFL'},mEJfnAhcLEvXOonkXyHwD=>597,HAZOai__Oeuny=>['uLkhvnHL','MpouB_KbUxvwcEubzzYLHgC'],ruZkzMnxAI=>0,yrOEvRUhB=>'XXKnDFeKb...
---
{WABlGg=>{MoXkWVwtWtBwkq=>'ugA;dKuoNX;kdvxPt;NHVRfS;ubUUbR;bBcvCG;qYxCdCMESXtRY;YG;_aac',TRjxvaPmnUCCiBTJqV=>{rtiJSiR=>'349-1-5',mflaxtxp=>'349-1-1',GboTnhYH=>'72668',TMQr_DaY=>'DT'},ORpx=>'TRjxvaPmnUCCiBTJqV',rMBPIcYzSQM=>'46684332Lve5'},gQ=>{svnVKH...
---

t/data/corpus view on Meta::CPAN

---
{WABlGg=>{EVWCeOuOkCRHK=>0,MoXkWVwtWtBwkq=>'_aac;y',hLFbBmKcaW=>{'270'=>[0,123637068,0],'3634'=>[0,123637068,0],'4996'=>[0,123637068,0],'959'=>[0,123637068,0],'1960'=>[0,123637068,0],'7507'=>[0,123637068,0],'1208'=>[0,123637068,0],'483'=>[0,123637068...
---
{WABlGg=>{MoXkWVwtWtBwkq=>'_aac;kdvxPt;NHVRfS;ubUUbR;bBcvCG;ugA;dKuoNX;YG',TRjxvaPmnUCCiBTJqV=>{rtiJSiR=>'349-3-1',mflaxtxp=>'349-3-8',GboTnhYH=>'110414280',TMQr_DaY=>'Ex-Gn'},ORpx=>'TRjxvaPmnUCCiBTJqV',rMBPIcYzSQM=>'30007Xm1o24437d'},gQ=>{svnVKHykek...
---
{WABlGg=>{WsxTgoCmJtWj=>195241,uJBWfGbhQli=>1024,EVWCeOuOkCRHK=>0,MoXkWVwtWtBwkq=>'kdvxPt;bBcvCG;_aac',FWbXcNs=>'CF',fnItfpriiXyKjY=>['3563','1365','4977','4996','172','483','1415','1392','7507','203','1208','3649398','931'],hLFbBmKcaW=>{'270'=>['0',...
---
{WABlGg=>{WsxTgoCmJtWj=>79121,freSfeVzWWZa=>{'6565629K3169930K0K58857'=>['39.112536',0],'6565629K3169930K0K85257'=>['8.919827',0],'13590196K3169930K0K10057'=>['39.112536',0],'13590196K3169930K0K93957'=>['8.919827',0],'5233038K3169930K0K58057'=>['39.1...
---
{WABlGg=>{MoXkWVwtWtBwkq=>'_aac;kdvxPt;bBcvCG;ksrFbf',DZQUXUpvxPbU=>0,ORpx=>'LEAt'},LumhOl=>{JuoIjb=>'*/*',EfrbvjmcgPegFyg=>'eVyK, RBriKYc',LTDrnMNCqjHMKxM=>'aT',WbGVflxHyB=>13,opsmlZOiaOUc=>3,HYpBCoBNdaqv=>'KqnhC/uUU',JTQ=>'1',pHlNZJCtCAR=>1,qpjfZFh...
---

view all matches for this distribution

Serge

3 results

view release on metacpan or search on metacpan

lib/Serge/Engine.pm view on Meta::CPAN

    $self->run_callbacks('before_save_localized_file', $file, $lang, \$out);

    my $enc = $self->{job}->{output_encoding};
    my $text;

    # print BOM
    if ($self->{job}->{output_bom}) {
        $text = "\xFF\xFE"         if  (uc($enc) eq 'UTF-16LE');
        $text = "\xFE\xFF"         if ((uc($enc) eq 'UTF-16BE') || (uc($enc) eq 'UTF-16'));
        $text = "\xFF\xFE\x00\x00" if  (uc($enc) eq 'UTF-32LE');
        $text = "\x00\x00\xFE\xFF" if ((uc($enc) eq 'UTF-32BE') || (uc($enc) eq 'UTF-32'));

view all matches for this distribution

Shared-Simple

1 match

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

BmFLAGS|5.009005||Viu
BmPREVIOUS|5.003007||Viu
BmRARE|5.003007||Viu
BmUSEFUL|5.003007||Viu
BOL|5.003007||Viu
BOM_UTF8|5.025005|5.003007|p
BOM_UTF8_FIRST_BYTE|5.019004||Viu
BOM_UTF8_TAIL|5.019004||Viu
bool|5.003007||Viu
boolSV|5.004000|5.003007|p
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution

ShiftJIS-CP932-MapUTF

3 results

view release on metacpan or search on metacpan

MapUTF.pod view on Meta::CPAN


B<This function is provided only for Perl 5.6.1 or later, and via XS.>

=item C<utf16_to_cp932([UNICODE_CALLBACK,] STRING [, UNICODE_OPTION])>

Converts UTF-16 (with or w/o C<BOM>) to CP-932.

=item C<utf16le_to_cp932([UNICODE_CALLBACK,] STRING [, UNICODE_OPTION])>

Converts UTF-16LE to CP-932.

MapUTF.pod view on Meta::CPAN


Converts UTF-16BE to CP-932.

=item C<utf32_to_cp932([UNICODE_CALLBACK,] STRING [, UNICODE_OPTION])>

Converts UTF-32 (with or w/o C<BOM>) to CP-932.

=item C<utf32le_to_cp932([UNICODE_CALLBACK,] STRING [, UNICODE_OPTION])>

Converts UTF-32LE to CP-932.

MapUTF.pod view on Meta::CPAN

                      utf32_to_cp932 [*]

[*] Their counterparts C<cp932_to_utf16()> and C<cp932_to_utf32()>
are not implemented yet. They need more investigation
on return values from C<SJIS_CALLBACK>...
(concatenation needs recognition of and coping with C<BOM>)

=head1 CAVEAT

Pure Perl edition of this module doesn't understand
any logically wide characters (see F<perlunicode>).

view all matches for this distribution

ShiftJIS-X0213-MapUTF

2 results

view release on metacpan or search on metacpan

MapUTF.pm view on Meta::CPAN

If C<SVf_UTF8> is not turned on,
C<STRING> is upgraded as an ISO 8859-1 (latin1) string.

=item C<utf16_to_sjis2004([UNICODE_CALLBACK,] STRING)>

Converts UTF-16 (with or w/o C<BOM>) to Shift_JIS-2004.

=item C<utf16le_to_sjis2004([UNICODE_CALLBACK,] STRING)>

Converts UTF-16LE to Shift_JIS-2004.

MapUTF.pm view on Meta::CPAN


Converts UTF-16BE to Shift_JIS-2004.

=item C<utf32_to_sjis2004([UNICODE_CALLBACK,] STRING)>

Converts UTF-32 (with or w/o C<BOM>) to Shift_JIS-2004.

=item C<utf32le_to_sjis2004([UNICODE_CALLBACK,] STRING)>

Converts UTF-32LE to Shift_JIS-2004.

MapUTF.pm view on Meta::CPAN

If C<SVf_UTF8> is not turned on,
C<STRING> is upgraded as an ISO 8859-1 (latin1) string.

=item C<utf16_to_sjis0213([UNICODE_CALLBACK,] STRING)>

Converts UTF-16 (with or w/o C<BOM>) to Shift_JISX0213.

=item C<utf16le_to_sjis0213([UNICODE_CALLBACK,] STRING)>

Converts UTF-16LE to Shift_JISX0213.

MapUTF.pm view on Meta::CPAN


Converts UTF-16BE to Shift_JISX0213.

=item C<utf32_to_sjis0213([UNICODE_CALLBACK,] STRING)>

Converts UTF-32 (with or w/o C<BOM>) to Shift_JISX0213.

=item C<utf32le_to_sjis0213([UNICODE_CALLBACK,] STRING)>

Converts UTF-32LE to Shift_JISX0213.

MapUTF.pm view on Meta::CPAN


[*] Their counterparts C<sjis2004_to_utf16()>, C<sjis2004_to_utf32()>,
C<sjis0213_to_utf16()> and C<sjis0213_to_utf32()>
are not implemented yet. They need more investigation
on return values from C<SJIS_CALLBACK>...
(concatenation needs recognition of and coping with C<BOM>)

=head1 BUGS

On mapping between SJIS-X and Unicode used in this module,
notice that:

view all matches for this distribution

Shout

1 match

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

bind_match|5.003007||Viu
block_end|5.004000|5.004000|
block_gimme|5.004000|5.004000|u
blockhook_register|5.013003|5.013003|x
block_start|5.004000|5.004000|
BOM_UTF8|5.025005|5.003007|p
boolSV|5.004000|5.003007|p
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu
_byte_dump_string|5.025006||cViu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution

Siebel-Params-Checker

1 match

view release on metacpan or search on metacpan

Changes view on Meta::CPAN

  <alceu.freitas.jr@gmail.com@f8da17be-bb99-043e-0d47-acc943b59c7d>
  Date : 2014-01-07 01:48:19 +0000

    fixed remaining bugs regarding output from srvrmgr updated output
    files fixed a bug in the shell script to automate data extraction now
    can deal with UTF-8 data with BOM automatically 

  Change: 38b1ce6a7766095467a774b555727c2ab7a8eee3
  Author: alceu.freitas.jr@gmail.com
  <alceu.freitas.jr@gmail.com@f8da17be-bb99-043e-0d47-acc943b59c7d>
  Date : 2014-01-06 22:29:04 +0000

view all matches for this distribution

Siebel-Srvrmgr

9 results

view release on metacpan or search on metacpan

lib/Siebel/Srvrmgr/Daemon/Light.pm view on Meta::CPAN

use Siebel::Srvrmgr::Daemon::Command;
use Carp qw(longmess);
use File::Temp 0.2304 qw(:POSIX);
use Data::Dumper;
use Siebel::Srvrmgr;
use File::BOM 0.14 qw(:all);
use Siebel::Srvrmgr::IPC qw(check_system);
use Try::Tiny 0.27;
our $VERSION = '0.29'; # VERSION

extends 'Siebel::Srvrmgr::Daemon';

view all matches for this distribution

Signal-Info

1 match

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

BOL_t8_p8|5.033003||Viu
BOL_t8_pb|5.033003||Viu
BOL_tb|5.035004||Viu
BOL_tb_p8|5.033003||Viu
BOL_tb_pb|5.033003||Viu
BOM_UTF8|5.025005|5.003007|p
BOM_UTF8_FIRST_BYTE|5.019004||Viu
BOM_UTF8_TAIL|5.019004||Viu
boolSV|5.004000|5.003007|p
boot_core_builtin|5.035007||Viu
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution

Signal-Unsafe

1 match

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

BOL_t8_p8|5.033003||Viu
BOL_t8_pb|5.033003||Viu
BOL_tb|5.035004||Viu
BOL_tb_p8|5.033003||Viu
BOL_tb_pb|5.033003||Viu
BOM_UTF8|5.025005|5.003007|p
BOM_UTF8_FIRST_BYTE|5.019004||Viu
BOM_UTF8_TAIL|5.019004||Viu
boolSV|5.004000|5.003007|p
boot_core_builtin|5.035007||Viu
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution

Simple-Accessor

1 match

view release on metacpan or search on metacpan

t/000-report-versions.t view on Meta::CPAN

        return $self->_error("Did not provide a string to load");
    }

    # Byte order marks
    # NOTE: Keeping this here to educate maintainers
    # my %BOM = (
    #     "\357\273\277" => 'UTF-8',
    #     "\376\377"     => 'UTF-16BE',
    #     "\377\376"     => 'UTF-16LE',
    #     "\377\376\0\0" => 'UTF-32LE'
    #     "\0\0\376\377" => 'UTF-32BE',
    # );
    if ( $string =~ /^(?:\376\377|\377\376|\377\376\0\0|\0\0\376\377)/ ) {
        return $self->_error("Stream has a non UTF-8 BOM");
    } else {
        # Strip UTF-8 bom if found, we'll just ignore it
        $string =~ s/^\357\273\277//;
    }

view all matches for this distribution

Sisimai

4 results

view release on metacpan or search on metacpan

set-of-emails/maildir/bsd/lhost-mfilter-04.eml view on Meta::CPAN

44KKCuOBk+OBruODoeODvOODq+OBr+mAgeS/oeOBp+OBjeOBvuOBm+OCk+OBp+OB
l+OBn+OAggoK5Lul5LiL44Gu44Oh44O844Or44Ki44OJ44Os44K544G444Gu6YCB
5L+h44Gr5aSx5pWX44GX44G+44GX44Gf44CCCmtpaml0b3JhQGxpYmlzaXNtYWku
b3JnCgoKLS0tLS0tLXNlcnZlciBtZXNzYWdlCjU1MCA1LjQuMSBBbGwgcmVjaXBp
ZW50IGFkZHJlc3NlcyByZWplY3RlZCA6IEFjY2VzcyBkZW5pZWQgW05FS09OWUFB
Ti5jYXQtSlBOMjIucHJvZC5wcm90ZWN0aW9uLm91dGxvb2suY29tXQoKLS0tLS0t
LVNNVFAgY29tbWFuZApEQVRBCgotLS0tLS0tb3JpZ2luYWwgbWFpbCBpbmZvCkZy
b206IHBvc3RtYXN0ZXJAZXhhbXBsZS5vcmcKU3ViamVjdDog44Gr44KD44O844KT
CkRhdGU6IFRodSwgMjkgQXByIDIwMTkgMjI6MjI6MjIgKzA5MDAgKEpTVCkKTWVz
c2FnZS1JRDogPDIwMTkwNDI5MjIyMjIyLkZGRkZGRkZGMDAyQG5la28ubnlhYW4u
ZXhhbXBsZS5jby5qcD4KQk9EWToKLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t

view all matches for this distribution

Slug

1 match

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

BmFLAGS|5.009005||Viu
BmPREVIOUS|5.003007||Viu
BmRARE|5.003007||Viu
BmUSEFUL|5.003007||Viu
BOL|5.003007||Viu
BOM_UTF8|5.025005|5.003007|p
BOM_UTF8_FIRST_BYTE|5.019004||Viu
BOM_UTF8_TAIL|5.019004||Viu
bool|5.003007||Viu
boolSV|5.004000|5.003007|p
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution

Socket-Class

1 match

view release on metacpan or search on metacpan

xs/sc_ssl/openssl/source/ms/reqU.ss view on Meta::CPAN

view all matches for this distribution

Socket-More-Interface

1 match

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

BOL_t8_p8|5.033003||Viu
BOL_t8_pb|5.033003||Viu
BOL_tb|5.035004||Viu
BOL_tb_p8|5.033003||Viu
BOL_tb_pb|5.033003||Viu
BOM_UTF8|5.025005|5.003007|p
BOM_UTF8_FIRST_BYTE|5.019004||Viu
BOM_UTF8_TAIL|5.019004||Viu
boolSV|5.004000|5.003007|p
boot_core_builtin|5.035007||Viu
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution

Socket-More-Lookup

1 match

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

BOL_t8_p8|5.033003||Viu
BOL_t8_pb|5.033003||Viu
BOL_tb|5.035004||Viu
BOL_tb_p8|5.033003||Viu
BOL_tb_pb|5.033003||Viu
BOM_UTF8|5.025005|5.003007|p
BOM_UTF8_FIRST_BYTE|5.019004||Viu
BOM_UTF8_TAIL|5.019004||Viu
boolSV|5.004000|5.003007|p
boot_core_builtin|5.035007||Viu
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution

Software-License-GPL3andArtistic2

1 match

view release on metacpan or search on metacpan

t/000-report-versions.t view on Meta::CPAN

		return $self->_error("Did not provide a string to load");
	}

	# Byte order marks
	# NOTE: Keeping this here to educate maintainers
	# my %BOM = (
	#     "\357\273\277" => 'UTF-8',
	#     "\376\377"     => 'UTF-16BE',
	#     "\377\376"     => 'UTF-16LE',
	#     "\377\376\0\0" => 'UTF-32LE'
	#     "\0\0\376\377" => 'UTF-32BE',
	# );
	if ( $string =~ /^(?:\376\377|\377\376|\377\376\0\0|\0\0\376\377)/ ) {
		return $self->_error("Stream has a non UTF-8 BOM");
	} else {
		# Strip UTF-8 bom if found, we'll just ignore it
		$string =~ s/^\357\273\277//;
	}

view all matches for this distribution

Sofu

4 results

view release on metacpan or search on metacpan

lib/Data/Sofu.pm view on Meta::CPAN

	unless (ref $file) {
		$$self{CurFile}=$file;
		open $fh,"<:raw",$$self{CurFile} or die "Sofu error open: $$self{CurFile} file: $!";
		$guess=1;
		binmode $fh;
		#eval {require File::BOM;my ($e,$sp)=File::BOM::defuse($fh);$$self{Ret}.=$sp;$e=$e;};undef $@;
	}
	elsif (ref $file eq "SCALAR") {
		$$self{CurFile}="Scalarref";
		open $fh,"<:utf8",$file or die "Can't open perlIO: $!" if utf8::is_utf8($$file);
		open $fh,"<",$file or die "Can't open perlIO: $!"  if !utf8::is_utf8($$file);;

lib/Data/Sofu.pm view on Meta::CPAN

	if ($guess)  {
		my $enc=guess_encoding($text);
		$text=$enc->decode($text) if ref $enc;
		$text=Encode::decode("UTF-8",$text) unless ref $enc;
	}
	substr($text,0,1,"") if substr($text,0,1) eq chr(65279); # UTF-8 BOM (Why ain't it removed ?)
	close $fh if ref $file;
	$$self{CurFile}="";
	my $u=$self->unpack($text);
	$self->{OBJECT}=0;
	return $u;

lib/Data/Sofu.pm view on Meta::CPAN

	unless (ref $file) {
		$$self{CurFile}=$file;
		open $fh,$$self{CurFile} or die "Sofu error open: $$self{CurFile} file: $!";
		$guess=1;
		binmode $fh;
		#eval {require File::BOM;my ($e,$sp)=File::BOM::defuse($fh);$$self{Ret}.=$sp;$e=$e;};undef $@;
	}
	elsif (ref $file eq "SCALAR") {
		$$self{CurFile}="Scalarref";
		open $fh,"<:utf8",$file or die "Can't open perlIO: $!" if utf8::is_utf8($$file);
		open $fh,"<",$file or die "Can't open perlIO: $!" if !utf8::is_utf8($$file);

lib/Data/Sofu.pm view on Meta::CPAN

		$text=$enc->decode($text) if ref $enc;
		$text=Encode::decode("UTF-8",$text) unless ref $enc;
	}
	close $fh if ref $file;
	$$self{CurFile}="";
	substr($text,0,1,"") if substr($text,0,1) eq chr(65279); # UTF-8 BOM (Why ain't it removed ?)
	my $u=$self->unpack($text);
	#print Data::Dumper->Dump([$u]);
	if (wantarray) {
		return () unless $u;	
		return %{$u} if ref $u eq "HASH";

lib/Data/Sofu.pm view on Meta::CPAN

On the other hand the output defaults to UTF-16 (UNIX) (like SofuD). If you need other encoding you will have to prepare the filehandle yourself and give it to the write() funktions...

	open my $fh,">:encoding(latin1)","out.sofu";
	writeSofu($fh,$data);

Warning: UTF32 BE is not supported without BOM (looks too much like Binary);

Notes:

As for Encodings under Windows you should always have a :raw a first layer, but to make them compatible with Windows programs you will have to access special tricks:

lib/Data/Sofu.pm view on Meta::CPAN

	
One last thing:

	open my $out,">:raw:encoding(UTF-16BE):crlf:utf8","out.sofu";
	print $out chr(65279); #Byte Order Mark
	#Now you can write out UTF16 with BOM in BigEndian (even if you machine in Little Endian)


=head1 SEE ALSO

perl(1),L<http://sofu.sf.net>

view all matches for this distribution

Solana-SPLAddress

1 match

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

BOL_t8_p8|5.033003||Viu
BOL_t8_pb|5.033003||Viu
BOL_tb|5.035004||Viu
BOL_tb_p8|5.033003||Viu
BOL_tb_pb|5.033003||Viu
BOM_UTF8|5.025005|5.003007|p
BOM_UTF8_FIRST_BYTE|5.019004||Viu
BOM_UTF8_TAIL|5.019004||Viu
boolSV|5.004000|5.003007|p
boot_core_builtin|5.035007||Viu
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution

Speech-Recognizer-SPX

1 match

view release on metacpan or search on metacpan

test.pl view on Meta::CPAN

    printf "  Start frame %d end frame %d word %s\n",
	$seg->sf, $seg->ef, $seg->word;
}
fbs_end();

if ($hyp =~ /GO TO THE LAB SAY HELLO TO ROBOMAN QUIT/i) {
    print "ok 4\n";
} else {
    print "not ok 4\n";
}

view all matches for this distribution

Spork-S5ThemeBlue

1 match

view release on metacpan or search on metacpan

lib/Spork/S5ThemeBlue.pm view on Meta::CPAN

HXC8wPKwyIUetbFhdQzfHSeTRwvgbY6cqpQWjnc6QSKRjYXMFwkj6UTFaSGBiITfI9FIyVswcUqK
zCIakzdIZGQSBnvspBBOxD4o7FCVlimlL07ZsysWSYiRoQYsFyPLXtDSBYfcQ49+CQRGRm5wYpSf
xX64Bwu1EgoV3KVfKohH571HmsX80B+TsMNtFoqahLQmL7xphhNhMwTG1NngwJmWcy7gjcX4EDGD
UMF57oidDXHnFD/ZTHlyjBr2VFEvXUHOGOCtoOGyZJ2qoc+lDLQVCO1ZPlmi/9AuULOhQ3koKyIK
zInGk3vXQuIzJZVMHqLKo3z4D0eDBkae4XOcDT0oRi8H0i9QM6AIeqlFYorSZtY0pAxtmUbldNJr
+mE+KzUCNUdaqKGqAqcnkOlRD5PUoD0SqvHRqSuwWgKpMklnMw0BOMOqEq2iqKgw3Q1Yi/LIqgYo
nYEEpC/IuoPmuLUI4OTqc5wqPbOUTa+XXCtbixMxs35En/VTayX4mLp8FHYid53cX//gGsAW8xqW
fdEm03oEr34UAJn9wSYjC6TN7hStp/0qafGKWYAZ9qmoJShdfzeN1aZjs7N9CFwNKE4AfZWxTGAn
U8XE1+D1dhehrRVoewKO3P8e5LWl4alR42lbqyrQi3uRLmf7WV3WXsO57THtVo8LopQOLYi9IRd0
Q3mEyZoXvCIoJXwjIt6Naje1egDFGko53Cytt6LW7cV8DZrcSn53dwzBaDCLVCDmgqPAlSluIy3W
05o0OBqm7S5r/vvT2861mW6QJYR5WV8hKXiWwXqphlfDYeTJbLqX0umAy1PicZULxafS6YgX0+Ix

view all matches for this distribution

Spreadsheet-Edit

5 results

view release on metacpan or search on metacpan

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

use File::Spec::Functions qw/devnull tmpdir rootdir catdir catfile/;

# Still sometimes convenient...
use File::Basename qw(basename);

use File::BOM ();
use File::Which qw/which/;
use URI::file ();
use Guard qw(guard scope_guard);
use Fcntl qw(:flock :seek);
use Symbol qw/qualify_to_ref/;

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

      .","  # default: false
      # Token 12: not use on import
      .","
      # Token 13: Import "=..." as formulas instead of text?
      .","  # default: false i.e. do not recognize formulas
      # Token 14: "Automatically detected since LibreOffice 7.6" [BOM?]
      .","
    }
    else {
      undef
    }

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

      .",".($opts->{allsheets} ? -1 :
            $opts->{sheetname} ? die("add named-sheet support here") :
            0)
      # Token 13: Not used for export
      .","
      # Token 14: true to include BOM in the result
      #.","
    }
    else {
      undef
    }

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN


sub _binmode_slurp_and_log($$$) { # *without trying to seek*
  my ($fh, $ref2octets, $debug) = @_;
  binmode($fh);
  local $/ = undef;
  #$$ref2octets = <$fh>//"";  # Now known to not have a BOM.  <<< IS THIS REALLY TRUE???
  $$ref2octets = <$fh>;
  btwN \3,"Raw slurp-from-0 fh=$fh: ",(defined($$ref2octets) ? visO(substr($$ref2octets,0,300)) : "*undef*")
    if $debug;
  $$ref2octets //= "";
}

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

  $chars
}


# Detect cvt_from and cvt_to from filename suffixes or by peeking at the data.
# If input is CSV, detect encoding (removing a BOM if present),
#   detect separator and quote characters, and generate default
#   {col_formats} which, e.g. reads items with leading zeroes
#   (e.g. Zip codes) as character data and not numbers.
#
# Unless the input is usable as-is it will be slurped into memory and the

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

      close $fh;
      $fh = undef;
      open $fh, "<:raw", $ref2octets or confess "BUG:in-mem open:$!";
      #_dump_fh("BBB unseekable, slurped");
    }
    my $bomenc = File::BOM::get_encoding_from_filehandle($fh);
    $start_pos = tell($fh);
    if ($bomenc) {
      btw dvis 'Input has BOM, $bomenc $start_pos' if $debug;
      $opts->{input_encoding} = $bomenc;
      binmode($fh); # unnecessary???
      binmode($fh, ":raw:encoding($bomenc):crlf") or die "binmode: $!";
    }
    #_dump_fh("CCC final");
  }
  my sub determine_input_encoding() {
    # If one encoding was specified by the user or implied by a BOM, use it;
    # otherwise try multiple encodings specified by the user or defaulted
    # until one seems to work.
    $opts->{input_encoding} //= $default_input_encodings;
    my @enclist = split m#,#, $opts->{input_encoding};
    return

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

    $csvopts{escape_char} = $csvopts{quote_char}; # must always be the same

    my $csv = Text::CSV->new (\%csvopts)
              or croak "Text::CSV->new: ", Text::CSV->error_diag(),
                       dvis('\n## %csvopts\n');
    seek($fh, $start_pos, SEEK_SET) or die $!; # skip over possible BOM
    my $rows;
    while (my $F = $csv->getline( $fh )) {
      push(@$rows, $F);
    }
    $rows

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

        $$r2rows = undef;
      }
    }
    unless (defined($$r2rows)) {
      #confess "Input file is not valid CSV (or we have a bug)\n"
      seek($fh, $start_pos, SEEK_SET) or die $!; # skip over possible BOM
      my $n = read($fh, my $somechars, 100);
      croak "ERROR READING input: $!" unless defined($n);
      if ($n == 0) {
        warn "File has NO CONTENT.  Treating it like an (empty) CSV\n"
          if $debug;

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

  my $done;
  if ($opts{cvt_from} eq $opts{cvt_to}) {  # csv to csv
    # Special cases: in & out are both CSVs
    if ($input_enc ne $output_enc || $start_pos != 0) {
      # Special case #1: In & out are CSV but using different encodings,
      #   or the same encoding but the input contained a BOM
      #   (which we never want in the output).
      #   With {allsheets} the output will be inside the {outpath} directory.
      my $dst = get_outcsv_path();
      warn "> Transcoding csv:  $input_enc -> $output_enc into ",qsh($dst),"\n"
        if $opts{debug};

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

INPUT may be a csv or spreadsheet workbook path; if a spreadsheet,
then a single "sheet" is converted, specified by either a !SHEETNAME suffix
in the INPUT path, a separate C<< sheetname => SHEETNAME >> option,
or if unspecified to extract the only sheet (croaks if there is more than one).

The resulting file handle refers to a guaranteed-seekable BOM-less CSV file.
This will either be a temporary file (auto-removed at process exit),
or the original INPUT if it was already a seekable csv file without a BOM.

RETURNS: A ref to a hash containing the following:

 {
  fh        => the resulting open file handle

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

results are saved to a temporary file or directory and that path is returned
as C<outpath> in the result hash.
The exception is if no conversion is necessary
when the input file itself is returned as C<outpath>
(i.e. C<cvt_from> is the same as C<cvt_to> and, if 'csv',
there was no BOM and an encoding change is not needed).

In all cases C<outpath> in the result hash points to the results.

C<cvt_from> or C<cvt_to> are filename suffixes (sans dot)
e.g. "csv", "xlsx", etc., and are only required if INPATH or C<outpath>

lib/Spreadsheet/Edit/IO.pm view on Meta::CPAN

Specifies the encoding of INPUT if it is a csv file.

ENCODING may be a comma-separated list of encoding
names which will be tried in the order until one seems to work.
If only one is specified it will be used without trying it first.
The default is "UTF-8,windows-1252".  If a BOM is present it overrides.

=item output_binmode => "..."

Used when writing csv file(s), defaults to ':raw:encoding(UTF-8):crlf'.

view all matches for this distribution

Spreadsheet-Read

2 results

view release on metacpan or search on metacpan

Changes view on Meta::CPAN

    * Consistent return value for parses ($type) on failure (issue#52)
    * New options for xlscat (--no-empty, --clip=N)
    * Support for hidden sheets

0.89	- 02 Jan 2024, H.Merijn Brand
    * Auto-use BOM in CSV *files* with xlscat script
    * Fix duplicate option letter (typo) (Erix)
    * It's 2024

0.88	- 07 Nov 2023, H.Merijn Brand
    * Guard $_ globbering from external bitrotted code

view all matches for this distribution

Spreadsheet-SimpleExcel

3 results

view release on metacpan or search on metacpan

META.json view on Meta::CPAN

         }
      },
      "develop" : {
         "requires" : {
            "Pod::Coverage::TrustPod" : "0",
            "Test::BOM" : "0",
            "Test::More" : "0.88",
            "Test::NoTabs" : "0",
            "Test::Perl::Critic" : "0",
            "Test::Pod" : "1.41",
            "Test::Pod::Coverage" : "1.08"

view all matches for this distribution

Stefo

1 match

view release on metacpan or search on metacpan

ppport.h view on Meta::CPAN

BOL_t8_p8|5.033003||Viu
BOL_t8_pb|5.033003||Viu
BOL_tb|5.035004||Viu
BOL_tb_p8|5.033003||Viu
BOL_tb_pb|5.033003||Viu
BOM_UTF8|5.025005|5.003007|p
BOM_UTF8_FIRST_BYTE|5.019004||Viu
BOM_UTF8_TAIL|5.019004||Viu
boolSV|5.004000|5.003007|p
boot_core_builtin|5.035007||Viu
boot_core_mro|5.009005||Viu
boot_core_PerlIO|5.007002||Viu
boot_core_UNIVERSAL|5.003007||Viu

ppport.h view on Meta::CPAN

#endif

#endif

#if 'A' == 65
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xEF\xBB\xBF"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xEF\xBF\xBD"
#endif

#elif '^' == 95
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x73\x66\x73"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x73\x73\x71"
#endif

#elif '^' == 176
#ifndef BOM_UTF8
#  define BOM_UTF8                       "\xDD\x72\x65\x72"
#endif

#ifndef REPLACEMENT_CHARACTER_UTF8
#  define REPLACEMENT_CHARACTER_UTF8     "\xDD\x72\x72\x70"
#endif

view all matches for this distribution