This should have gone to the list instead of direct to Ralph.

On 26/04/2024 12:43, Ralph Corderoy wrote:

What's the output of
     sed -n 'l; /^}/q' /usr/share/perl5/Debconf/AutoSelect.pm

For example,

     $ sed -n 'l; /^}/q' /usr/share/perl5/Debconf/AutoSelect.pm
     #!/usr/bin/perl -w$
     # This file was preprocessed, do not edit!$
     $
     $
     package Debconf::AutoSelect;$
     use strict;$
     use Debconf::Gettext;$
     use Debconf::ConfModule;$
     use Debconf::Config;$
     use Debconf::Log qw(:all);$
     use base qw(Exporter);$
     our @EXPORT_OK = qw(make_frontend make_confmodule);$
     our %EXPORT_TAGS = (all => [@EXPORT_OK]);$
     $
     BEGIN {$
     \teval {$
     \t\trequire Glib::Object::Introspection;$
     \t};$
     }$
     $

Nothing like that:

sed -n 'l; /^}/q' /usr/share/perl5/Debconf/AutoSelect.pm


\377\377\377\377\377\377\377\377\377\377\377\377\377\377\377\377\377\
\377\377\377\377\377\377\377\377\377\377\377\377\377\377\377\377\377\
\377\377\377\377\377\37......

Screen-fulls of that.

--
Terry Coles


--
 Next meeting: Online, Jitsi, Tuesday, 2024-05-07 20:00
 Check to whom you are replying
 Meetings, mailing list, IRC, ...  http://dorset.lug.org.uk
 New thread, don't hijack:  mailto:dorset@mailman.lug.org.uk

Reply via email to