$ perl -e '/*/'
Quantifier follows nothing in regex; marked by <-- HERE in m/* <-- HER
+E / at -e line 1.
$ perl -e '/\*/'
[download]

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]

use strict;
use warnings;

use Test::More;

my @good = (
    '* leading asterisk',
    'trailing asterisk *',
    'multiple *** asterisk'
);

my @bad = (
    'foo',
    '',
    '^'
);

my $re = qr/\*/;

plan tests => @good + @bad;

for my $str (@good) {
    like ($str, $re, "$str matched");
}
for my $str (@bad) {
    unlike ($str, $re, "$str not matched");
}
[download]

See How to ask better questions using Test::More and sample data for how to write tests like this and formulate your question to fully illustrate the problem.

I happened to come across an issue of finding a string in 'non-regular' log file.

Define "non-regular". Do you just mean the lines have different lengths?

Please show the input for your string (i.e. the file generated by 'tmboot -y'). And also show the code you currently have and does not match your expectations (and in which sens it does not fo what you want).

Hi guys, Thank you for all the replies. It did not work yesterday for some reason, but it works now using /*/s.

but it works now using /*/s.

Again a Quantifier follows nothing in regex; marked by <-- HERE in m/* <-- HERE / - did you read the answers above?

perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'