Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

=pod has no effect #1465

Closed
p6rt opened this issue Jan 3, 2010 · 8 comments
Closed

=pod has no effect #1465

p6rt opened this issue Jan 3, 2010 · 8 comments

Comments

@p6rt
Copy link

p6rt commented Jan 3, 2010

Migrated from rt.perl.org#71812 (status was 'resolved')

Searchable as RT71812$

@p6rt
Copy link
Author

p6rt commented Jan 3, 2010

From @nkh

rakudo commit​: db84bc06990c37b93fe987dcffab4ed9bf31de92
build/PARROT_REVISION​: 43076 1.9.0

=pod
sub A() {1}

say A ;

# A is run

@p6rt
Copy link
Author

p6rt commented Jun 28, 2010

From @bbkr

On Kiev build there is now warning about using deprecated POD syntax.

# perl6 -e 'eval "=pod\nsay 666;\n=cut"; say $!'
Obsolete pod format, please use =begin/=end instead at line 1, near
"pod\nsay 66"

However bare '=pod' still makes code executable

# perl6 -e 'eval "=pod\nsay 666;"; say $!'
666

So not fixed yet.

@p6rt
Copy link
Author

p6rt commented Jun 28, 2010

The RT System itself - Status changed from 'new' to 'open'

@p6rt
Copy link
Author

p6rt commented Oct 1, 2011

From @coke

On Mon Jun 28 09​:03​:34 2010, bbkr wrote​:

On Kiev build there is now warning about using deprecated POD syntax.

# perl6 -e 'eval "=pod\nsay 666;\n=cut"; say $!'
Obsolete pod format, please use =begin/=end instead at line 1, near
"pod\nsay 66"

However bare '=pod' still makes code executable

# perl6 -e 'eval "=pod\nsay 666;"; say $!'
666

So not fixed yet.

The problem seems to be limited to =pod in eval;

$ cat foo
eval "=pod\nsay 666;"
$ ./perl6 foo
666
$ cat bar
=pod
say 666;
$ ./perl6 bar
$

--
Will "Coke" Coleda

@p6rt
Copy link
Author

p6rt commented Nov 15, 2012

From @bbkr

2012.10 - still broken

$ perl6 -e 'eval "=pod\nsay 666;"'
666

@p6rt
Copy link
Author

p6rt commented Apr 13, 2014

From @Mouq

On Thu Nov 15 05​:04​:51 2012, bbkr wrote​:

2012.10 - still broken

$ perl6 -e 'eval "=pod\nsay 666;"'
666

Looks ok now​:

$ perl6 -e 'EVAL "=pod\nsay 666;"'
$

Just needs tests

@p6rt
Copy link
Author

p6rt commented Sep 5, 2014

From @hoelzro

Fixed, and tests added to roast.

@p6rt
Copy link
Author

p6rt commented Sep 5, 2014

@hoelzro - Status changed from 'open' to 'resolved'

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Projects
None yet
Development

No branches or pull requests

1 participant